如何聚合R行中的每4行

Question

我的 data.frame 包含 120 行，其中包含 3 列：

我想将每 4 周转换为一个月，并根据相应的周对每个月的 Total_score 求和。

应该是这样的：

month SumScore
1      1
2      5

Answer 1

这是使用

dplyr

的解决方案：

library(dplyr)
df %>%
  # create grouping variable `batch` of 4 weeks each:
  mutate(batch = (row_number() - 1) %/% 4) %>%
  # for each batch...:
  group_by(batch) %>%
  # calculate the sum of `score`:
  summarise(ScoreSum = sum(score))