R中按组汇总数据的所有数据列

Question

我有一个数据框，其中包含由3个字符变量

定义的唯一组

catvars <- c("DATE", "COUNTRY_FULL_NAME", "TENOR")

数据框的其余部分由20个数字变量组成（在下面的示例中将其浓缩为3）

numvars <- c("X1", "Y1, "Z1")

我正在尝试创建一个新的数据框，其中每个数字变量的平均值按组计算

对于单个变量，我可以使用plyr包中的ddply：

DFsum <- ddply(DF, catvars, summarize, X1mean = mean(X, na.rm=TRUE))

但我无法弄清楚如何修改此ddply命令以包含所有数字变量。有什么建议？谢谢

Answer 1

我认为您正在寻找numcolwise？

ddply(diamonds,.(cut),numcolwise(mean,na.rm = TRUE))
        cut     carat    depth    table    price        x        y        z
1      Fair 1.0461366 64.04168 59.05379 4358.758 6.246894 6.182652 3.982770
2      Good 0.8491847 62.36588 58.69464 3928.864 5.838785 5.850744 3.639507
3 Very Good 0.8063814 61.81828 57.95615 3981.760 5.740696 5.770026 3.559801
4   Premium 0.8919549 61.26467 58.74610 4584.258 5.973887 5.944879 3.647124
5     Ideal 0.7028370 61.70940 55.95167 3457.542 5.507451 5.520080 3.401448