R语言summarize函数结果四舍五入问题：mtcars统计值保留两位小数报错

你的代码存在两个核心问题：

• 列命名与round函数的用法混淆：你错误地将列名写在了round函数的参数内部，不符合R的语法规则，正确方式是通过列名 = 计算逻辑的结构定义列，再将统计结果传入round函数。
• 括号配对错误：最后一行代码中round(max = max(mpg, na.rm=TRUE)), 2)多了一个右括号，导致语法解析失败。

以下是修正后的两种实现方式：

方式一：逐个统计并四舍五入 #

mtcars_summary <- mtcars %>%
  group_by(cyl) %>%
  summarize(
    min_mpg = round(min(mpg, na.rm = TRUE), 2),
    q1_mpg = round(quantile(mpg, 0.25, na.rm = TRUE), 2),
    q2_mpg = round(quantile(mpg, 0.5, na.rm = TRUE), 2),
    mean_mpg = round(mean(mpg, na.rm = TRUE), 2),
    q3_mpg = round(quantile(mpg, 0.75, na.rm = TRUE), 2),
    max_mpg = round(max(mpg, na.rm = TRUE), 2)
  )

这种写法直接对每个统计量的结果执行四舍五入，同时给每一列赋予清晰名称，便于后续识别。

方式二：先统计后统一处理 #

如果需要统计的指标较多，可以先计算所有原始统计值，再统一对结果列执行四舍五入：

mtcars_summary <- mtcars %>%
  group_by(cyl) %>%
  summarize(
    min_mpg = min(mpg, na.rm = TRUE),
    q1_mpg = quantile(mpg, 0.25, na.rm = TRUE),
    q2_mpg = quantile(mpg, 0.5, na.rm = TRUE),
    mean_mpg = mean(mpg, na.rm = TRUE),
    q3_mpg = quantile(mpg, 0.75, na.rm = TRUE),
    max_mpg = max(mpg, na.rm = TRUE)
  ) %>%
  mutate(across(-cyl, ~round(.x, 2)))

mutate(across(-cyl, ~round(.x, 2)))会对除分组列cyl之外的所有列统一保留两位小数，简化重复代码。

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