使用 dplyr 对数据框分组并计算累积和

可以使用 dplyr 的 group_by 和 mutate 函数实现：

library(dplyr)

sl <- sl %>%
  group_by(Period, Nrate, Hybrid) %>%
  mutate(Total = sum(Organ), 
         bio = sum(bio), 
         biomass = sum(biomass))

首先使用 group_by 函数按照 Period, Nrate, Hybrid 进行分组，然后使用 mutate 函数对每组的 Organ 列新增加 Total 列，使用 sum 函数计算原始 Organ 所有类的 bio 和 biomass 的累积和，并新增加 bio 和 biomass 列。最后重新赋值给 sl 数据框。