如何使用cowplot包在R中的同一页面上制作几个图？

Posted 2021-05-06

我在R中使用内置数据集iris，我想在我使用cowplot包的同一页面上绘制几个图。 然而，我面临的问题是图中的标签i，e“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)"))

答案

你可以尝试使用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 )