我有这样一个数据框:
metric1 metric2 metric3 field1 field2
1 1.07809668 4.2569882 7.1710095 L S1
2 0.56174763 1.2660273 -0.3751915 L S2
3 1.17447327 5.5186679 11.6868322 L S2
4 0.32830724 -0.8374830 1.8973718 S S2
5 -0.51213503 -0.3076640 10.0730274 S S1
6 0.24133119 2.7984703 15.9622215 S S1
7 1.96664414 0.1818531 2.7416768 S S3
8 0.06669409 3.8652075 10.5066330 S S3
9 1.14660437 8.5703119 3.4294062 L S4
10 -0.72785683 9.3320762 1.3827989 L S4
Run Code Online (Sandbox Code Playgroud)
我正在显示2个字段,但还有几个字段.我需要对每个字段分组的指标进行求和,例如对于field1:
DF %>% group_by(field1) %>% summarise_each(funs(sum),metric1,metric2,metric3)
Run Code Online (Sandbox Code Playgroud)
我可以为每个字段执行此操作,其中列将是sum(metric1),sum(metric2),sum(metric3),但我需要的表输出是这样的:
L(field1) S(field1) S1(field2) S2(field2) S3(field2) S4(field2)
sum(metric1) …Run Code Online (Sandbox Code Playgroud)