ggplot2绘图时group参数覆盖fill映射的解决方法咨询

你当前代码的核心问题出在group=1的设置：
ggplot2中显式指定的group映射优先级高于fill这类离散映射自动生成的隐式分组。当你设置group=1时，程序会把所有钻石数据视为同一个全局分组计算占比，after_stat(prop)返回的是每个color在全量数据集里的占比，自然无法实现每个cut分类下不同color的占比展示。

方案1：直接调整映射参数 #

只需要把group的取值改为和x轴一致的cut即可，此时after_stat(prop)会按cut分组计算占比，每个cut分类下所有color的占比总和为1，同时保留fill的颜色映射：

ggplot(data = diamonds) +
  geom_bar(mapping = aes(x = cut, fill = color, y = after_stat(prop), group = cut))

如果要让占比堆叠后高度统一为1，更直观展示占比，可以加上position = "fill"参数：

ggplot(data = diamonds) +
  geom_bar(mapping = aes(x = cut, fill = color, y = after_stat(prop), group = cut), position = "fill")

方案2：提前汇总数据后绘图（更适合新手理解） #

你也可以先手动完成占比统计再绘图，不需要依赖ggplot2的内置统计转换，逻辑更清晰不容易出错：

library(dplyr)

# 先分组统计数量、计算每个cut下各color的占比
diamonds_summary <- diamonds %>%
  count(cut, color) %>%
  group_by(cut) %>%
  mutate(prop = n / sum(n))

# 绘图
ggplot(diamonds_summary, aes(x = cut, y = prop, fill = color)) +
  geom_col()

• ggplot2分组优先级：显式设置的group参数 > 离散型美学映射（fill/color/shape等）自动生成的隐式分组
• after_stat(prop)的计算逻辑：对每个指定的group分组，子分组的计数除以当前group的总计数

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