如何使用dplyr创建汇总其他因子水平总数值的新因子水平

示例数据构造 #

library(dplyr)
df <- tibble(
  year = c(2019, 2019, 2020, 2020),
  sex = c("M", "F", "M", "F"),
  value = c(10, 20, 50, 20)
)

方案1：行绑定汇总结果（易读性最高） #

df %>%
  # 拼接按year分组的汇总行
  bind_rows(
    df %>%
      group_by(year) %>%
      summarise(sex = "Total", value = sum(value))
  ) %>%
  # 按year、sex排序得到要求的输出顺序
  arrange(year, sex)

方案2：组内追加汇总行（写法更简洁） #

df %>%
  group_by(year) %>%
  group_modify(~ bind_rows(.x, tibble(sex = "Total", value = sum(.x$value)))) %>%
  ungroup()

两种方案输出结果均和期望格式完全匹配。

内容的提问来源于stack exchange，提问作者AJ_0000