我正在使用dplyr,我想知道是否可以在一行中计算组之间的差异。如下面的小示例所示,任务是计算A组和Bs组之间标准化的“ cent”变量之间的差异。
library(dplyr)
# creating a small data.frame
GROUP <- rep(c("A","B"),each=10)
NUMBE <- rnorm(20,50,10)
datf <- data.frame(GROUP,NUMBE)
datf2 <- datf %.% group_by(GROUP) %.% mutate(cent = (NUMBE - mean(NUMBE))/sd(NUMBE))
gA <- datf2 %.% ungroup() %.% filter(GROUP == "A") %.% select(cent)
gB <- datf2 %.% ungroup() %.% filter(GROUP == "B") %.% select(cent)
gA - gB
通过创建不同的对象,这当然没有问题-但是执行此任务的方式是否更“内置”?像这样的东西在下面不起作用的幻想代码?
datf2 %.% summarize(filter(GROUP == "A",select(cent)) - filter(GROUP == "B",select(cent)))
谢谢!
给定每个组中有10个,分别添加索引1:10、1:10并对其进行总结,不同之处在于:
> datf2$entry=c(1:10,1:10)
> datf2 %.% ungroup() %.% group_by(entry) %.% summarize(d=cent[1]-cent[2])
Source: local data frame [10 x 2]
entry d
1 1 -0.8272879
2 2 -0.9159827
3 3 -0.5064762
4 4 0.4211639
5 5 1.3681720
6 6 3.3430289
7 7 1.0086822
8 8 -0.6163907
9 9 -0.7325220
10 10 -2.5423875
相比:
> gA - gB
cent
1 -0.8272879
2 -0.9159827
3 -0.5064762
4 0.4211639
5 1.3681720
6 3.3430289
7 1.0086822
8 -0.6163907
9 -0.7325220
10 -2.5423875
有没有一种方法可以将entry
字段注入数据或dplyr
调用中?我不确定,它似乎依赖于对数据了解太多的功能...
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句