如何创建每n个数字的总和？

Question

我有一个包含此列的数据框：

1
1
1
1
2
2
2
2
3
3
3
3

我希望每n个数字加总（说4）。预期产出：

4
8
12

我该怎么做？我知道如何做rollum，但想知道是否有任何功能可以做到这一点？

Answer 1

X <- data.frame(value = c(1, 1, 1, 1, 2, 2, 2, 2, 3, 3, 3, 3))
X$group = rep(1:(nrow(X)/4), each=4)

tapply(X$value, X$group, FUN = sum)

这里最难的部分是分配小组。有关详细信息，请参阅?rep。