如何修改R语言绘图标签？解决柱状图标签重叠问题

针对你遇到的x轴标签重叠问题，这里有几种实用的解决方法，直接整合到你的代码里即可：

1. 旋转x轴标签 #

通过旋转标签角度并调整对齐方式，避免标签横向挤压：

ggplot(question2, aes(x=educa, fill=X_incomg)) + 
  geom_bar(position = "fill")+ 
  ylab("比例") + 
  ggtitle("受教育程度与收入类别对比") +
  scale_fill_brewer("收入水平", palette="Set2") +
  theme_bw() +
  theme(axis.text.x = element_text(angle = 45, hjust = 1)) # 旋转45度并右对齐

注：angle可根据标签长度调整为30、60等，hjust=1保证标签右端对齐x轴刻度，避免偏移。

2. 缩小x轴标签字号 #

如果标签本身不长，缩小字号能快速缓解重叠：

ggplot(question2, aes(x=educa, fill=X_incomg)) + 
  geom_bar(position = "fill")+ 
  ylab("比例") + 
  ggtitle("受教育程度与收入类别对比") +
  scale_fill_brewer("收入水平", palette="Set2") +
  theme_bw() +
  theme(axis.text.x = element_text(size = 8)) # 将字号设为8（默认通常是10）

可以和旋转标签的方法结合使用，效果更佳。

3. 让标签自动换行 #

如果educa是长文本标签，先对变量做换行处理（需要stringr包）：

library(stringr)
# 对educa字段按每10个字符换行，生成新字段
question2$educa_wrap <- str_wrap(question2$educa, width = 10)

# 用新字段绘图
ggplot(question2, aes(x=educa_wrap, fill=X_incomg)) + 
  geom_bar(position = "fill")+ 
  ylab("比例") + 
  ggtitle("受教育程度与收入类别对比") +
  scale_fill_brewer("收入水平", palette="Set2") +
  theme_bw()

width参数可根据标签实际长度调整，确保每行文本不会过长。

4. 增大图表宽度 #

如果是导出图片，通过指定更大的宽度给x轴预留足够空间：

# 导出时设置宽度为12英寸，高度6英寸
ggsave("education_income_plot.png", width = 12, height = 6, dpi = 300)

在RStudio中也可以手动拉大右侧的绘图窗口，实时调整效果。

内容的提问来源于stack exchange，提问作者Eric Sebastián Sánchez Conde