如何用dplyr按组计算单列百分比并忽略空白？代码补全求助

你的代码主要有两个关键问题，导致无法得到期望的结果：

1. 列名大小写不匹配 #

R是大小写敏感的，你的数据框里列名是Color（首字母大写），但代码里分组用的是小写的color，这会导致分组逻辑出错（要么找不到列报错，要么分组无效）。

2. 未提前过滤空白值 #

你需要忽略Color列的空白值，但当前代码没有先过滤这些值——group_by会把NA/空白字符串当成一个单独的分组，最终计算百分比时会把这些空白值的数量算入总和，导致结果偏差。而且n()只是统计每组的行数，不会自动排除空白组。

修正后的代码 #

Df %>%
  # 先过滤掉Color列的NA和空字符串（空白值）
  filter(!is.na(Color), Color != "") %>%
  # 使用正确的列名进行分组
  group_by(Color) %>%
  summarise(n = n()) %>%
  # 计算百分比并保留两位小数，匹配你要的0.33和0.67
  mutate(per = round(n / sum(n), 2))

代码解释 #

• filter(!is.na(Color), Color != "")：确保只保留Color列有有效取值的行，彻底排除空白值的干扰；
• group_by(Color)：和数据框的列名保持一致，保证分组正确；
• round(n / sum(n), 2)：把百分比四舍五入到两位小数，正好得到你期望的0.33和0.67（如果不需要四舍五入，去掉round()即可保留原始精度）。

运行这段代码后，你会得到包含Color、n、per三列的结果，完全符合你的预期：

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