dplyr
中的功能是否与summarise
相反,即将一行转为多行?
让我们考虑一个看起来如下的data.frame:
> testdf <- data.frame(a=c(1,1,2,2), b=c(1,2,1,2))
> testdf <- data.frame(a1=c(1,1,2,2), a2=c(1,2,1,2))
> testdf$a3 <- replicate(4, rnorm(3), simplify = F)
> testdf
a1 a2 a3
1 1 1 -0.6264538, 0.1836433, -0.8356286
2 1 2 1.5952808, 0.3295078, -0.8204684
3 2 1 0.4874291, 0.7383247, 0.5757814
4 2 2 -0.3053884, 1.5117812, 0.3898432
我现在想把它变成一个4 * 3 = 12行的data.frame,其中每个单元格中的每个值都是原子的。换句话说,我想扩展专栏a3。结果应如下所示:
> resdf
a1 a2 a3
1 1 1 -0.6264538
2 1 1 0.1836433
3 1 1 -0.8356286
4 1 2 1.5952808
5 1 2 0.3295078
6 1 2 -0.8204684
7 2 1 0.4874291
8 2 1 0.7383247
9 2 1 0.5757814
10 2 2 -0.3053884
11 2 2 1.5117812
12 2 2 0.3898432
请注意,类似于上面所示的数据框架可能会出现在许多情况下,例如:处理大量数据时(出于内存效率的原因)。 this question中要求使用类似的功能。
我知道有些解决方案没有使用dplyr
,但我有兴趣使用它,因为我想为分组(group_by(a2)
)数据子集执行此操作。
答案 0 :(得分:6)
这似乎是不可能的,但在目标版本为0.5的 active discussion by the developers 下。
注意data.table
目前允许这样做(请参阅@ akrun的注释),并且还允许您使用任意大小的组输入来获得任意大小的组输出,而似乎正在与{{ 1}}将要求所有组的大小相同。这是一个例子:
dplyr
此外,根据@ AlexBrown的评论,你可以这样做:
> data.table(a=1:3)[, paste(a, seq(a), sep=":"), by=a]
a V1
1: 1 1:1
2: 2 2:1
3: 2 2:2
4: 3 3:1
5: 3 3:2
6: 3 3:3
针对您的具体示例,但由于上述原因,这似乎不适用于unnest(testdf, a3)
/ group_by
工作流程(即您无法直接创建summarize
testdf
,AFAIK)。