Ответ 1
Пример Dummy, основанный на аналогичном SO-вопросе: Поместить название панели мультипликации с ggplot2
-
Сначала создайте макет с требуемым количеством строк + 1 короткий для заголовка:
pushViewport(viewport(layout = grid.layout(3, 2, heights = unit(c(0.5, 5, 5), "null"))))
-
Создайте там несколько сюжетов:
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))
-
Добавить заголовок в верхнюю строку:
grid.text("MAIN TITLE", vp = viewport(layout.pos.row = 1, layout.pos.col = 1:2))
Результат: