r - 在 r 的一页上显示 ggplot 的多个图

Question

我想在一个循环中制作多个 ggplot 并将它们显示在一个图上。

for ( i in 1:8) {
    g <- ggplot(data=mtcars, aes(x=hp, y=wt))+
        geom_point()
    print(g)
}

我想将上面的图排列在一页上，4行2列。有谁知道这是怎么做到的吗？谢谢。

Answer 1

您可以将所有绘图保存在列表中，然后使用cowplot::plot_grid()或gridExtra::marrangeGrob()来将它们放在一页或多页中

另请参阅:

• Creating arbitrary panes in ggplot2 (拼凑作品、multipanelfigure 和egg 包)

• Multiple plots in for loop

library(tidyverse)

# create a list with a specific length 
plot_lst <- vector("list", length = 8)

for (i in 1:8) {
  g <- ggplot(data = mtcars, aes(x = hp, y = wt)) +
    geom_point()
  plot_lst[[i]] <- g
}

# Combine all plots
cowplot::plot_grid(plotlist = plot_lst, nrow = 4)

library(gridExtra)
ml1 <- marrangeGrob(plot_lst, nrow = 2, ncol = 2)
ml1

^{由reprex package于2018年9月20日创建(v0.2.1.9000)}