R语言ggplot绘制分组柱状图时如何让顶部文本标签正确对齐

问题原因 #

标签无法对齐的核心是geom_text层没有配置分组规则，ggplot无法识别需要按region1维度进行偏移，导致所有年份的标签都堆叠在同一x坐标位置。

调整方案 #

方案1：全局声明分组映射（更简洁） #

将分组用的fill和color映射放到全局aes中，所有图层默认继承该规则，保证柱子和标签的偏移逻辑完全一致：

ggplot(dataExample, aes(x = startYear, y = n, fill = as.factor(region1), color = as.factor(region1))) +
  geom_col(position = position_dodge(0.8), width = 0.7) +
  geom_text(aes(label = n),
            position = position_dodge(width = 0.8), # 和柱子的dodge宽度保持完全一致
            vjust = -0.2) # 可选参数，让标签高出柱子顶部，避免贴附

方案2：单独为文本层指定分组 #

如果不需要全局设置映射，也可以仅在geom_text的aes中添加group参数指定分组维度：

ggplot(dataExample, aes(x = startYear, y = n)) +
  geom_col(aes(color = as.factor(region1), 
               fill = as.factor(region1)),
           position = position_dodge(0.8), width = 0.7)+
  geom_text(aes(label = n, group = as.factor(region1)), # 单独指定文本的分组规则
            position = position_dodge(0.8),
            vjust = -0.2)

核心调整点 #

• 保证geom_col和geom_text的position_dodge宽度参数完全一致
• 为geom_text配置和柱子相同的分组规则，避免文本无差别堆叠
• 可通过vjust参数微调标签的垂直位置，适配不同的图表尺寸需求

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