如何使用Cowplot包在R中的同一页面上绘制多个图？

Question

我正在使用R中的内置数据集虹膜，我想在同一页面上绘制一些图形，而我正在使用Cowplot程序包。
但是，我面临的问题是图中的标签“ A”和“ B”与y轴重叠。如何在标签和y轴之间留出一些空间？ 我的代码是：

View(iris)
library(tidyverse)

p1 <- ggplot(iris, aes(Sepal.Length, Petal.Length, col = Species))+geom_point()
p2 <- ggplot(iris, aes(Sepal.Length, Petal.Width, col = Species))+geom_point()
library(cowplot)
plot_grid(p1,p2, labels = c("(A)","(B)"))

Answer 1

您可以尝试使用plot_grid的选项，默认选项为：

plot_grid(p1,p2, labels = c("(A)","(B)"), align = 'h', label_size = 12,
          label_x = 0, label_y = 1, hjust = -0.5, vjust = 1.5 )

例如，如下所示：

plot_grid(p1,p2, labels = c("(A)","(B)"), align = 'h', label_size = 12,
          label_x = 0, label_y = 1, hjust = -0.1, vjust = 5 )