r - 使用 cowplot 中的 plot_grid 排列绘图时，较长的绘图标签向右移动

Question

我被问到 this question on Twitter并认为把它放在这里可能会很好。

使用 plot_grid() 制作带标签的并排图时，对于单字母标签，事情按预期工作:

library(cowplot)

p1 <- ggplot(iris, aes(x = Sepal.Length, fill = Species)) + 
  geom_density(alpha = 0.7) +
  ggtitle("") + theme_minimal()

p2 <- ggplot(iris, aes(x = Sepal.Length, fill = Species)) + 
  geom_density(alpha = 0.7) +
  ggtitle("") +
  scale_fill_grey() + theme_minimal()

plot_grid(p1, p2, labels = c("A", "B"))

但是，如果我们使用较长的字符串作为标签，标签会向右移动，并且它们移动得越多，字符串越长:

plot_grid(p1, p2, labels = c("Density plot in color", "In gray"))

如何解决这个问题？

免责声明:我是包的作者。在这里发布这个答案，希望它会有用。

Answer 1

参数的默认设置hjust和 label_x在 plot_grid()已针对单字母标签进行了优化，但不适用于较长的标签。覆盖设置可以解决问题:

plot_grid(p1, p2, labels = c("Density plot in color", "In gray"),
          hjust = 0, label_x = 0.01)

特别是默认 hjust设置为 hjust = -0.5 .这会将标签向右移动相当于其宽度一半的量。这对于单个字母标签是有意义的，因为这样我们可以通过设置 label_x = 0 来让字母出现在离左边框半个字母宽度的地方。 ，并且无论标签字体大小或用户可能选择的任何其他绘图功能如何，这都将起作用。

但是，对于较长的标签，尤其是不同长度的标签，将标签移动其宽度的一半完全没有任何意义。