使用ggarrange排列带显著性标注的ggplot时如何对齐y轴

解决方案 #

你之前调整无效的核心原因是：仅修改了y轴的刻度和标签，没有强制固定y轴的数值范围，ggplot会自动根据每个图内显著性标注的最高位置动态调整y轴上限，最终导致不同图的y轴渲染高度不一致。

按以下步骤修改即可解决：

1. 为所有9张图的scale_y_continuous添加limits参数，强制统一y轴的数值范围，同时保留仅显示1-6刻度的需求，示例代码如下：

# 可先将统一的y轴配置提取为公共对象，避免重复修改
common_y_axis <- scale_y_continuous(
  limits = c(1, 7), # 上限根据你最高的显著性标注高度调整，比最大标注高0.2-0.5即可
  breaks = seq(1, 6, by = 1), # 仅显示1-6的刻度
  oob = scales::oob_keep # 可选，防止超出原数据范围的显著性标注被截断
)

2. 将上述公共配置添加到每一张ggplot对象的代码中，例如你示例中的gg_example末尾追加+ common_y_axis即可。
3. 保持原ggarrange的align = "hv"参数不变，重新拼接图表即可实现y轴完全对齐。

如果想要更稳定的拼接效果，也可以替换ggarrange为patchwork包实现多图拼接，语法更简洁，对齐逻辑更可控：

library(patchwork)
# 按3行3列排列，统一应用y轴配置和无图例的主题
figure <- (gg_1 + gg_2 + gg_3) / 
          (gg_4 + gg_5 + gg_6) / 
          (gg_7 + gg_8 + gg_9) &
          common_y_axis &
          theme(legend.position = "none")

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