R语言ggplot2分组柱状图X轴刻度、柱间距、顶部文本调整问题求助

问题1：X轴仅显示整数年份刻度 #

你遇到的非整数刻度问题核心原因是year字段为数值型，ggplot默认将其识别为连续轴，自动计算刻度时就可能出现半整数。该现象偶尔出现或消失是因为ggplot连续轴的刻度步长会根据X轴取值范围、绘图区域宽度动态调整，步长为1时就不会出现半整数刻度，有两种彻底修复的方案：

• 方案1：将X轴转为离散轴，把aes里的x参数改成factor(year)，即可自动按年份值生成整数刻度
• 方案2：保留连续轴，手动指定刻度：在绘图代码中添加scale_x_continuous(breaks = unique(graph_text$year))，直接指定所有要显示的年份刻度，还可灵活调整显示的年份范围

问题2：红蓝分组柱之间添加间距 #

通过调整geom_bar的width（单柱宽度）和position_dodge的width（分组避让总宽度）实现：将原代码里的geom_bar(position = 'dodge', stat='identity')改成geom_bar(width = 0.7, position = position_dodge(0.8), stat='identity')，两个参数的差值就是两组柱子之间的间距，可根据美观需求调整数值大小。

问题3：柱状图顶部数值文本加粗 #

在geom_text的参数中添加fontface = "bold"即可实现文本加粗效果，注意要将geom_text的position_dodge宽度和geom_bar的避让宽度保持一致，避免文本和柱子错位。

修改后完整可运行代码 #

library(ggplot2)
ymax <- max(graph_text$percentage)
ggplot(aes(x=year, y=percentage, color = gender, fill=gender), data = graph_text) +
  # 调整柱宽和避让宽度增加组间距
  geom_bar(width = 0.7, position = position_dodge(0.8), stat='identity') +
  theme_classic() +
  # 添加fontface参数实现文本加粗，dodge宽度和柱的避让宽度匹配避免错位
  geom_text(aes(label = percentage), size = 4, fontface = "bold",
            position = position_dodge(width = 0.8), vjust=-0.2) +
  scale_y_continuous(limits=c(0, 1.4*ymax)) +
  # 手动指定X轴整数刻度，彻底避免半整数刻度问题
  scale_x_continuous(breaks = unique(graph_text$year))

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