如何在ggplot2中用stat="count"为柱状图加标签及堆叠柱形图添数据标签

我来帮你搞定这个问题——你遇到的核心卡点是在使用position="fill"（百分比堆叠柱状图）时，没有正确调用stat="count"生成的统计量来设置geom_text的y和label美学属性。下面是分步的解决方案：

1. 正确添加百分比/计数标签 #

当你用geom_bar(position="fill")时，ggplot会自动把每个堆叠块的高度归一化为0-1之间的比例（对应百分比）。要添加标签，你需要：

• 用stat="count"让ggplot计算每个分组的计数和比例
• 通过after_stat()引用计算出的prop（比例）作为y轴位置，count作为计数值，或者用scales::percent(prop)生成百分比格式的标签
• 设置position=position_fill(vjust=0.5)让标签垂直居中在每个堆叠块里

示例代码（百分比标签） #

library(ggplot2)
library(scales)

ggplot(property, aes(x = Bedrooms.New, fill = Property.Type.)) +
  # 生成百分比堆叠柱状图
  geom_bar(position = "fill") +
  # 添加百分比标签
  geom_text(
    stat = "count",
    aes(
      y = after_stat(prop),  # 用计算出的比例作为y轴位置
      label = after_stat(percent(prop))  # 将比例转为百分比字符串
    ),
    position = position_fill(vjust = 0.5),  # 让标签居中显示
    size = 3  # 可根据需求调整标签大小
  ) +
  # 重命名y轴为百分比
  scale_y_continuous(name = "Percentage", labels = percent) +
  # 保留你原有x轴的设置
  scale_x_discrete(
    name = "Number of Bedrooms",
    limits = sort(factor(unique(property$Bedrooms.New)))
  )

如果要显示计数标签 #

只需要修改label的内容即可：

geom_text(
  stat = "count",
  aes(
    y = after_stat(prop),
    label = after_stat(count)  # 显示原始计数值
  ),
  position = position_fill(vjust = 0.5),
  size = 3
)

2. 优化颜色对比度 #

默认填充色的对比度可能不够清晰，你可以用这两种方法调整：

• 使用R自带的高对比度调色板：比如scale_fill_brewer(palette = "Dark2")（适合区分多类别），或者"Set1"、"Paired"等其他预设调色板
• 自定义颜色：用scale_fill_manual(values = c("#E69F00", "#56B4E9", "#009E73", "#D55E00"))（替换成你需要的十六进制颜色码即可）

把颜色优化添加到代码中的示例：

ggplot(...) +
  # 原有代码部分...
  scale_fill_brewer(palette = "Dark2") +  # 应用高对比度调色板
  theme_minimal()  # 可选：搭配简约主题提升整体视觉效果

为什么你之前的代码会报错？ #

当你使用position="fill"时，ggplot并没有在原始数据中创建y变量，而是通过stat="count"动态计算了比例值。所以geom_text需要明确引用这些计算后的统计量（用after_stat()），而不是直接指定原始数据里的y字段——这就是系统提示你缺少y和label美学属性的原因。

内容的提问来源于stack exchange，提问作者nike.96