如何调整ggplot中X轴刻度文本的间距？

针对你当前的需求，这里提供几个实用的实现方案：

1. 直接设置文本边距 #

在theme(axis.text.x = element_text())中通过margin参数控制刻度文本的上下左右间距，同时可搭配size调整文本大小，避免拥挤：

ggplot(dt, aes(x = cases, y = n)) + 
  geom_bar(stat = "identity", fill = "grey") + 
  labs(x = "cases", y = "Trace Count") + 
  theme_bw() + 
  theme(axis.text.x = element_text(angle = 70, hjust = 1, 
                                  size = 10,
                                  margin = margin(t = 6, r = 0, b = 0, l = 0))) # t参数控制文本与X轴的垂直间距，单位mm

2. 扩展X轴刻度范围 #

如果X轴是离散型变量，使用scale_x_discrete()的expand参数扩大刻度之间的横向间距：

ggplot(dt, aes(x = cases, y = n)) + 
  geom_bar(stat = "identity", fill = "grey") + 
  labs(x = "cases", y = "Trace Count") + 
  theme_bw() + 
  scale_x_discrete(expand = expansion(add = 0.6)) # add值越大，刻度间横向间距越宽
  theme(axis.text.x = element_text(angle = 70, hjust = 1))

3. 优化旋转角度（辅助方案） #

若文本仍显拥挤，可尝试调整旋转角度（比如改为45度），配合hjust=1能间接提升可读性：

ggplot(dt, aes(x = cases, y = n)) + 
  geom_bar(stat = "identity", fill = "grey") + 
  labs(x = "cases", y = "Trace Count") + 
  theme_bw() + 
  theme(axis.text.x = element_text(angle = 45, hjust = 1))

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