如何让ggplot2中facet_wrap的所有子图显示x轴标签？

使用ggplot2的facet_wrap函数按tr字段分面绘图时，仅最后一组子图显示x轴标签（AA、BB、CC），其余子图无该标签，如何设置让所有子图下方都显示x轴标签？

原始代码：

library(ggplot2)

dat <- read.table(text = "
br tr   nbs Method  acc
CC TTT  259    NEW  0.02450
CC TTT  259    OLD  0.01974
CC LLL 1035    NEW  0.28283
CC LLL 1035    OLD  0.16452
CC GGG 1074    NEW  0.31853
CC GGG 1074    OLD  0.18404
CC FFF 1076    NEW  0.50280
CC FFF 1076    OLD  0.32355
CC DDD  260    NEW  0.33026
CC DDD  260    OLD  0.22996
BB TTT  313    NEW  0.21159
BB TTT  313    OLD  0.01854
BB LLL 1442    NEW  0.28157
BB LLL 1442    OLD  0.16598
BB GGG 1442    NEW  0.29526
BB GGG 1442    OLD  0.13012
BB FFF 1444    NEW  0.44271
BB FFF 1444    OLD  0.32320
BB DDD  311    NEW  0.38943
BB DDD  311    OLD  0.22127
AA TTT  666    NEW  0.23289
AA TTT  666    OLD -0.03539
AA LLL 1026    NEW  0.27130
AA LLL 1026    OLD  0.13948
AA GGG 1090    NEW  0.24337
AA GGG 1090    OLD  0.07120
AA FFF 1090    NEW  0.43193
AA FFF 1090    OLD  0.31404
AA DDD  665    NEW  0.39351
AA DDD  665    OLD  0.08671
", header = TRUE)

ggplot(dat, aes(x = br, y = acc, fill = Method))+
  geom_col(colour="black",width=1, position=position_dodge(0.7), na.rm=FALSE) +
  facet_wrap(~tr, strip.position = "top")

有两种常用方法可以实现所有子图显示x轴标签：

方法1：使用scales = "free_x"参数 #

在facet_wrap中添加该参数，让每个子图的x轴独立显示标签，这是最简洁的方案：

ggplot(dat, aes(x = br, y = acc, fill = Method))+
  geom_col(colour="black",width=1, position=position_dodge(0.7), na.rm=FALSE) +
  facet_wrap(~tr, strip.position = "top", scales = "free_x")

方法2：通过theme强制统一显示标签 #

如果需要保持所有子图x轴范围一致，仅强制显示标签，可以调整主题设置：

ggplot(dat, aes(x = br, y = acc, fill = Method))+
  geom_col(colour="black",width=1, position=position_dodge(0.7), na.rm=FALSE) +
  facet_wrap(~tr, strip.position = "top") +
  theme(
    strip.placement = "outside",  # 将分面标题移到x轴上方外侧
    axis.text.x = element_text(angle = 0, vjust = 0.5),  # 调整标签位置避免重叠
    panel.spacing.x = unit(1, "lines"),  # 增加子图间距
    strip.background = element_blank()  # 可选：移除分面标题背景
  ) +
  scale_x_discrete(guide = guide_axis(n.dodge = 1))  # 确保标签不被遮挡

说明 #

• 方法1适用于所有子图x轴类别相同的场景，free_x会让每个子图自动显示完整的x轴标签，不会因为分面布局被隐藏。
• 方法2适合需要统一x轴范围的情况，通过主题设置强制显示所有标签，同时优化布局避免重叠。

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