将您的超长示例缩小为只有2个显示问题的面板的简单版本:
plot_grid(Urban1, Stand1, align = "v", ncol = 1)
我们可以使用对齐传说 theme(legend.justification = ...
theme(legend.justification = ...
plot_grid( Urban1 + theme(legend.justification = c(0,1)), Stand1 + theme(legend.justification = c(0,1)), align = "v", ncol = 1)