ggplot2をforで繰り返し作成して一つにまとめる

こちらの記事を読んで、気になったので自分なりにやってみました。

library(ggplot2)
library(gridExtra)
plots <- list()
for (i in 1:6) {
  plots[[i]] <- ggplot() +
    geom_point(aes(1:10, rnorm(10)))
}
marrangeGrob(plots, nrow=2, ncol=3, top="")

ポイントは、ggplot2()でaesは指定せず、こんな感じにすることと、gridExtraパッケージを利用すれば複数plotについても柔軟にできることです。

ただ、gridExtraパッケージは私がまだそこまで使いこなせてないので細かいところはよくわかりません。

以上です。