2

如何在 R 中获取带有小计的数据透视表（如 MS Excel 数据透视表）？

我正在使用dcastfrom package 在 R 中创建枢轴。我还使用andreshape2得到了总计。我承认我不理解参数集中的复杂性。我只知道如何创建数据透视表，帮助文件超出了我的想象。如果有人可以解决这个问题（我怀疑它可以做到这一切），并解释解决方案所需的参数，那将非常有帮助。rowSumscolSumsdcastdcast

我正在使用此代码（C2 有两个因素，X1 和 X2）：

PIV <- dcast(DF, C1~C2, value.var="C3", sum)

我没有得到所有这些边距、子集、填充或删除的作用。帮助文件似乎过于迟钝，我在互联网上也没有得到太多帮助。

样本枢轴（没有小计，T 是总计）：

C1 X1 X2 T
a  12 1  13
a  14 2  16
b  16 3  19
b  11 4  15
b  8  5  13
T  61 15 76

样本预期枢轴（带有小计 t，T 是总计）

C1 X1 X2 T
a  12 1  13
a  14 2  16
ta 26 3  29
b  16 3  19
b  11 4  15
b  8  5  13
tb 35 12 47
T  61 15 76
4

1 回答 1

3

假设您开始时没有任何总计，如下所示：

mydf <- structure(list(C1 = c("a", "a", "b", "b", "b"), X1 = c(12L, 14L, 
    16L, 11L, 8L), X2 = 1:5), .Names = c("C1", "X1", "X2"), row.names = c(NA, 
    5L), class = "data.frame")

mydf
##   C1 X1 X2
## 1  a 12  1
## 2  a 14  2
## 3  b 16  3
## 4  b 11  4
## 5  b  8  5

然后你必须使用margins参数 fordcast来获得你想要的输出。

library(reshape2)
mydfl <- melt(mydf)
mydfl$ind <- with(mydfl, ave(C1, C1, variable, FUN = seq_along))
dcast(mydfl, C1 + ind ~ variable, sum, 
      margins = c("C1", "ind", "variable"))
#      C1   ind X1 X2 (all)
# 1     a     1 12  1    13
# 2     a     2 14  2    16
# 3     a (all) 26  3    29
# 4     b     1 16  3    19
# 5     b     2 11  4    15
# 6     b     3  8  5    13
# 7     b (all) 35 12    47
# 8 (all) (all) 61 15    76

“margins”参数用于获取小计。在这里，我们根据“C1”（总计）和“ind”变量（小计）进行小计，我们还添加了行总计（使用“变量”）。

也就是说，我不确定我是否会推荐这个，因为你在同一个表中混合了数据和分析。

于 2017-12-18T18:17:08.663 回答