小编Vin*_*mme的帖子

将ng-click事件插入ng-grid

我想做一些我不知道是否可能的事情

HTML

<!DOCTYPE html>
    <html ng-app="myApp">
    <head lang="en">
        <meta charset="utf-8">
        <title>Custom Plunker</title>  
        <link rel="stylesheet" type="text/css" href="http://angular-ui.github.com/ng-grid/css/ng-grid.css" />
        <link rel="stylesheet" type="text/css" href="style.css" />
        <script src="https://ajax.googleapis.com/ajax/libs/jquery/1.8.0/jquery.min.js"></script>
        <script src="https://ajax.googleapis.com/ajax/libs/angularjs/1.0.2/angular.min.js"></script>
        <script type="text/javascript" src="http://angular-ui.github.com/ng-grid/lib/ng-grid.debug.js"></script>
        <script type="text/javascript" src="main.js"></script>
    </head>
    <body ng-controller="MyCtrl">
        <div class="gridStyle" ng-grid="gridOptions"></div>
    </body>
 </html>
Run Code Online (Sandbox Code Playgroud)

JS

// main.js
var app = angular.module('myApp', ['ngGrid']);
app.controller('MyCtrl', function($scope) {
    $scope.myData = [{name: "Moroni", age: 50},
                     {name: "Tiancum", age: 43},
                     {name: "Jacob", age: 27},
                     {name: "Nephi", age: 29},
                     {name: "Enos", age: 34}];
    $scope.gridOptions = { data: 'myData',
                         cellTemplate:'<div class="ngCellText" …
Run Code Online (Sandbox Code Playgroud)

events angularjs angular-ui ng-grid angularjs-ng-click

9
推荐指数
3
解决办法
3万
查看次数

如何访问RStudio中的脚本/源历史记录?

我想访问RStudio中源代码面板中输入内容的历史记录.

我对学习和输入代码的方式很感兴趣.我想分析的三件事是:i)单个人输入代码的方式,ii)不同的人如何键入代码,iii)初学者改进打字的方式.

抓住命令的历史是非常令人满意的,因为这是第一次尝试,但我希望达到更精细的粒度,从而一条线路中以一种方式访问连续的变化.

所以,要清楚,我既不是在寻找命令历史,也不是在.R文件的不同版本之间寻找差异.

我想要访问的实际上是在递归按下时可见的源面板的连续更改Ctrl+Z.我不知道我所描述的内容是否更准确,但我感兴趣的是在源面板中如何添加/移动/删除/纠正/改进代码,但不必传递给控制台因而没有指挥史.

这必须在某个地方/以某种方式由RStudio保存,因为它可以被后者访问.这可能以非常隐藏/私有/内存/进程/ ...的方式保存,我对GUI的工作原理非常模糊.我不知道它是否易于访问,然后进行程序化分析,通常是我们可以从中保存文件.时间戳将是最顶级的樱桃,但我会很高兴没有.

你知道如何访问这段历史吗?

r rstudio

8
推荐指数
1
解决办法
2428
查看次数

通过匹配变量将值从一个data.frame添加到另一个data.frame

假设我有两个数据帧df1和df2如下

Df1

Id Price Profit Month
10  5     2      1
10  5     3      2
10  5     2      3
11  7     3      1
11  7     1      2
12  0     0      1
12  5     1      2

Df2

Id Name
9  Kane
10 Jack
10 Jack
11 Will
12 Matt
13 Lee
14 Han
Run Code Online (Sandbox Code Playgroud)

现在我想在Df1named中插入一个新列,NameDf2根据匹配得到它的值Id

所以修改后的Df1会

Id Price Profit Month Name
10  5     2      1    Jack
10  5     3      2    Jack
10  5     2      3    Jack …
Run Code Online (Sandbox Code Playgroud)

r dataframe

5
推荐指数
2
解决办法
3934
查看次数

如何控制R中函数的输出(类似于lm)

我在R中创建一个自定义函数,它将一些不同的变量作为输入,并创建一个data.frame,一个图和一些汇总统计数据,所有这些都存储在一个列表中.我只想在调用函数时打印出摘要统计信息,但在显式调用时可以使用plot和data.frame.

我认为我想要的是如何lm()操作,但我不确定它是如何实现的.

当我打印lm我返回的对象时,只得到打印输出$call$coefficients:

lm(mtcars$mpg ~ mtcars$cyl)

Call:
lm(formula = mtcars$mpg ~ mtcars$cyl)

Coefficients:
(Intercept)   mtcars$cyl  
     37.885       -2.876  
Run Code Online (Sandbox Code Playgroud)

但是在幕后显然,函数调用中有更多可用的东西lm.

lm(mtcars$mpg[1:3] ~ mtcars$cyl[1:3])$residuals
            1             2             3 
-1.280530e-15  1.280530e-15  8.365277e-31 

> unclass(lm(mtcars$mpg[1:3] ~ mtcars$cyl[1:3])

Call:
lm(formula = mtcars$mpg[1:3] ~ mtcars$cyl[1:3])

Coefficients:
    (Intercept)  mtcars$cyl[1:3]  
           26.4             -0.9  


> unclass(lm(mtcars$mpg[1:3] ~ mtcars$cyl[1:3]))
$coefficients
    (Intercept) mtcars$cyl[1:3] 
           26.4            -0.9 

$residuals
            1             2             3 
-1.280530e-15  1.280530e-15  8.365277e-31 

$effects
    (Intercept) mtcars$cyl[1:3]                 
  -3.741230e+01    1.469694e+00    1.810943e-15 

....

$call
lm(formula = mtcars$mpg[1:3] ~ …
Run Code Online (Sandbox Code Playgroud)

r

5
推荐指数
1
解决办法
588
查看次数

如何向 ggplot + geom_point 图添加均值

我有 10 组数据点,我正在尝试为要在绘图上显示的每个组添加平均值(例如,通过不同的符号,如大三角形或星形或类似的东西)。这是一个可重现的例子

library(ggplot2)
library(reshape2)
set.seed(1234)

x <- matrix(rnorm(100),10,10)
varnames <- paste("var", seq(1,10))

df <- data.frame(x)
colnames(df) <- varnames
melt(df)

ggplot(data = melt(df)) + geom_point(mapping = aes(x = variable, y = value))
mymeans <- colMeans(df)
Run Code Online (Sandbox Code Playgroud)

基本上我现在想mymeans在各自的变量位置绘制值,有人知道如何快速做到这一点吗?

r ggplot2

4
推荐指数
2
解决办法
1万
查看次数

在JointJS中自动换行

我正在研究JointJS.我有各种带文字的元素.但是元素的宽度随着文本的增加而增加.我想动态设置元素的大小,使得盒子可以达到最大高度和宽度,并通过文本换行相应地扩展.如果文本os无法放入最大高度和宽度元素,则可以动态减少fontsize.

我试过style="word-wrap: break-word;"在我的div id中使用.但是没有效果.

<div id="myholder" style="word-wrap: break-word;"> </div>
Run Code Online (Sandbox Code Playgroud)

我的持有人在JS文件中定义如下: var paper = new joint.dia.Paper({ el: $('#myholder'), width: 1200, height: 700, model: graph }); 我可以遵循什么策略?

javascript word-wrap jointjs

2
推荐指数
1
解决办法
3812
查看次数

公式在r中的箱形图

我无法理解公式如何在R中起作用,公式是什么.那么,如果我有一个包含月度时间序列的向量,我怎么能创建一个盒子图,其中数据按季节逻辑划分?我想有12盒,每月一盒.

r boxplot

-3
推荐指数
1
解决办法
868
查看次数