r - 如何调整ggarrange ggpubr ggplot中的边距(轴元素消失)R

Question

我想使用 ggarrange 将 3 个图堆叠为 1 个，但底部图的 x 轴元素(日期)总是消失。

例如，此处缺少 plot_3 (Z) 的轴元素。

ggarrange(plot_1, plot_2, plot_3 + rremove("x.text"), 
          nrow = 3, align = "h")

当我改变顺序时，plot_2(Y) 的轴元素现在消失了。

ggarrange(plot_1, plot_3, plot_2 + rremove("x.text"), 
          nrow = 3, align = "h")

我尝试调整每个 ggplot 中的边距，但同样的问题仍然存在。所以，我想这一定与 ggarrange 中的边距有关。

顺便说一下，我还尝试删除前两个图的所有 x 轴标题，并保留最后一个(底部)图的标题，但同样，日期仍然缺失。

Answer 1

我认为函数 theme() 会很有用

ggarrange(plot_1, plot_2, plot_3 + rremove("x.text"), 
          nrow = 3, align = "h")+
  theme(plot.margin = margin(0.1,0.1,2,0.1, "cm"))