1

我有一个简单的查询。我正在尝试获取数组中两列之间每一行的标准偏差(数组长度为 n = 2;我知道这是一个小样本量)

它构成了较长代码的一部分,但很简单:

data$i  <- sd(data$x, data$y)^2 + (0.1)^2 / data$j

所以我的数据看起来像这样:

x   y
3   13
4   9
19  3
14  3
18  4
3   10
9   4
3   6
3   8
10  9
8   10
11  9
13  12
15  14
19  16
8   8
8   18
11  14
10  12
18  14
12  20
6   8

而且,只需使用sd(),我想得到这个:

7.1
3.5
11.3
7.8
9.9
4.9
3.5
2.1
3.5
0.7
1.4
1.4
0.7
0.7
2.1
0.0
7.1
2.1
1.4
2.8
5.7
1.4
4

1 回答 1

4

要跨行应用sd(),您将使用apply

apply(data[, c("x","y")],1,sd)
于 2014-05-23T15:23:57.370 回答