分成不同的列并计算平均值

Question

您能帮我做这个编码吗？ 我在Excel中有一列数据（100,000行），我想将其分为1000列的100列。然后，我想计算一个新的excel文件中每5行的平均值。

谢谢。

(?!,")

Answer 1

这里是从感兴趣的列中创建matrix的一种方法，方法是指定nrow和ncol，然后split matrix进行分组用gl创建的索引每行5行，用list遍历sapply并获得列均值

m1 <- matrix(df1$Column, ncol = 100, nrow = 1000)
sapply(split(seq_len(nrow(m1)), as.integer(gl(nrow(m1), 5,
        nrow(m1)))), function(i) colMeans(m1[i, ]))