set.seed(0)
ESS <- list()
for (j in 1:100) {
temp <- data.frame(v1 = rnorm(1000),
v2 = rnorm(1000),
v3 = rnorm(1000));
ESS[[j]] <- temp
}
我想将列表缩减为单个数据帧,其中此数据帧中的每个元素是列表中存储的 100 个值的平均值。
由于您已经在 ESS 中写入了 100 个 data.frames,ldply 将返回每个 data.frame 的 colMeans 并将它们绑定到单个输出中:
library(plyr)
ldply(ESS, colMeans)
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句