r - R：グリッドレイアウトタイトル

Question

グリッドパッケージを使用して、次のようなプロットの配列を表示しています。

layout <- grid.layout(2, 4)
pushViewport(viewport(layout = layout))
# print various plots

グリッドレイアウト全体のタイトルを指定する方法はありますか？

Answer 1

別の方法：

library(gridExtra)
g = rectGrob() # dummy "plot"
grid.arrange(g, g, g, g, ncol=2, top = "Main Title")

Answer 2

同様のSO質問に基づくダミーの例：ggplot2を使用してマルチプロットパネルのタイトルを配置します

1. まず、必要な行数+1つのタイトル用の短い行数でレイアウトを作成します。

   pushViewport(viewport(layout = grid.layout(3, 2, heights = unit(c(0.5, 5, 5), "null"))))   
   

2. そこでいくつかのプロットを作成します。

   print(ggplot(mtcars, aes(hp)) + geom_histogram(), vp = viewport(layout.pos.row = 2, layout.pos.col = 1:2))
   print(ggplot(mtcars, aes(wt)) + geom_histogram(), vp = viewport(layout.pos.row = 3, layout.pos.col = 1))
   print(ggplot(mtcars, aes(mpg)) + geom_histogram(), vp = viewport(layout.pos.row = 3, layout.pos.col = 2))
   

3. 一番上の行にタイトルを追加します。

   grid.text("MAIN TITLE", vp = viewport(layout.pos.row = 1, layout.pos.col = 1:2))
   

その結果：