无需重复全局分组，如何实现R语言中的按组汇总操作？

Base R 原生 aggregate() 函数 #

完全支持你想要的公式式语法，和boxplot的写法逻辑一致，直接在函数内指定分组和要汇总的变量，无需额外分组步骤：

单数值变量 + 单分组变量 #

# 按group_var分组，计算num_var的均值
aggregate(num_var ~ group_var, data = df, FUN = mean)

# 同时计算均值和标准差
aggregate(num_var ~ group_var, data = df, FUN = function(x) c(均值 = mean(x), 标准差 = sd(x)))

多数值变量 + 单分组变量 #

用.代表数据框里所有数值型变量，一次性批量汇总：

aggregate(. ~ group_var, data = df, FUN = mean)

dplyr 简化写法（一行完成分组+汇总） #

虽然依赖group_by()，但可以把分组和汇总逻辑压缩到一行，在同一个代码块里只需修改分组变量即可快速切换，操作同样高效：

library(dplyr)

# 按var1分组，汇总num1、num2的均值和标准差
df %>% group_by(var1) %>% summarize(across(c(num1, num2), ~c(均值=mean(.), 标准差=sd(.))))

# 切换为按var2分组，直接修改group_by的参数
df %>% group_by(var2) %>% summarize(across(num1, median))

data.table 极简按组汇总 #

data.table的语法天生适合按组操作，无需单独分组函数，直接在方括号内同时指定分组和汇总逻辑，代码更紧凑：

library(data.table)
setDT(df) # 将普通数据框转为data.table格式

# 按group_var分组，计算num_var的均值和中位数
df[, .(均值=mean(num_var), 中位数=median(num_var)), by = group_var]

# 切换分组变量，仅修改by参数即可
df[, .(总和=sum(num_var)), by = another_group_var]

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