R: Grid Layout Titel

Question

ich das Raster-Paket mit einer Reihe von Plots wie folgt angezeigt werden:

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

Gibt es eine Möglichkeit, einen Titel für das ganze Raster-Layout angeben?

Answer 1

Dummy Beispiel basiert auf einer ähnlichen Frage SO: Place title of multiplot panel with ggplot2

1. Zuerst ein Layout mit der erforderlichen Anzahl von Zeilen + 1 kurz einen für Titel erstellen:

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

2. einige Parzellen dort erstellen :

   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. Fügen Sie einen Titel zum oberen ro hinzu w:

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

Resultierende in:

Answer 2

anderen Worten:

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