如何用dplyr的mutate()动态指定列进行行求和？

你遇到的错误是因为sum()无法直接处理字符类型的列名向量，需要将字符列名转换为dplyr可识别的列引用，再进行逐行求和。以下是两种可行的修改方案：

方案1：使用rowwise + c_across（适合需要逐行处理的场景） #

保留rowwise()分组，用c_across()提取指定列的行值，配合all_of()解析字符列名：

library(dplyr)

columns_to_sum <- c("gear", "carb")

mtcars %>%
  rowwise() %>%
  mutate(newcol = sum(c_across(all_of(columns_to_sum)))) %>%
  ungroup() # 完成操作后取消行分组，避免后续操作性能损耗

方案2：使用rowSums + pick（更高效，推荐） #

无需启用rowwise()，直接用pick()选择目标列，再通过rowSums()按行求和，大数据集下性能更优：

library(dplyr)

columns_to_sum <- c("gear", "carb")

mtcars %>%
  mutate(newcol = rowSums(pick(all_of(columns_to_sum)), na.rm = TRUE))

na.rm = TRUE参数可选，用于忽略求和时的缺失值，可根据你的数据情况调整。

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