R语言柱状图顶部显示分类最小值异常：显示多值而非单值

你当前代码里的geom_text直接调用min(pressure)，会对整个筛选后的数据集计算最小值，而非按setting分组计算每个柱子对应的最小值，所以每个柱子上方会叠加显示所有数据点的计算结果（导致多个值堆叠）。

修改方法是让geom_text和geom_col使用相同的统计逻辑，按组计算最小值，代码如下：

ggplot(subset(new_data, device %in% "Thera_PEP"),
       aes(setting, pressure, group = setting, fill = setting)) +
  geom_col(position = "dodge",
           stat = "summary",
           fun = "min") + 
  scale_x_continuous(breaks = seq(1, 6, 1)) + 
  scale_y_continuous(label = scales::comma) + 
  theme_classic() + 
  ylab("Minimum Trigger Pressure") + 
  xlab("Device setting") + 
  geom_text(stat = "summary",
            fun = "min",
            aes(label = after_stat(value)),
            position = position_dodge(width=0.9), 
            vjust = -0.25)

修改说明： #

• 给geom_text添加stat="summary"和fun="min"，使其按setting分组计算每个组的最小值
• 用after_stat(value)获取统计计算后的最小值，作为文本标签内容
• 保留原有的位置调整参数，确保文本和柱子对齐且显示在顶部

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