使用ggpubr -R标记每个地块

Question

我使用ggarange将一组R图排列成一组，如何在每个子图的左上角标记它们A、B和C？

代码：

library(ggplot2)
library(ggpubr)


# default ggplot2 theme
P1 <- ggplot(iris, aes(Sepal.Length, Petal.Width, color = Species)) + 
  geom_point()

P2 <- ggplot(iris, aes(Sepal.Length, Sepal.Width, color = Species)) + 
  geom_point()

P3 <- ggplot(iris, aes(Petal.Length, Sepal.Width, color = Species)) + 
  geom_point()
 

ggarrange(P1, P2, P3,  ncol=3, nrow=1, common.legend = TRUE, legend="bottom")

Answer 1

使用标签

ggarrange(P1, P2, P3,  labels = c("A", "B", "C"),
          ncol = 3, nrow = 1, 
          common.legend = TRUE, legend = "bottom")

​

​