Grid.arrange ggplot2 вычисляет по столбцам вместо строки с использованием списков

Я хочу создать множитель графиков ggplot2 из списка с помощью grid.arrange, но упорядочить их по столбцам, прежде чем делать это по строкам.

gg_list1 <- list(qplot(mpg, disp, data = mtcars), 
                 qplot(hp, wt, data = mtcars), 
                 qplot(qsec, wt, data = mtcars))

gg_list2 <- list(qplot(mpg, disp, data = mtcars), 
                 qplot(hp, wt, data = mtcars), 
                 qplot(qsec, wt, data = mtcars))

Я знаю, что могу это сделать:

do.call(grid.arrange,c(gg_list1,gg_list2 , ncol = 2, nrow  = 3))

но он заполняется слева направо вверху донизу.

Я пробовал это:

 do.call(grid.arrange, c(gg_list1, arrangeGrob(gg_list2, nrow = 3), ncol = 2))

Но получим Error: length(widths) == ncol is not TRUE

Любые идеи?

my_layout <- rbind(c(1, 1:3, 4), c(1, 1:3, 4), c(1, 1:3, 5), c(1, 1:3, 6)) my_layout ## [,1] [,2] [,3] [,4] [,5] ## [1,] 1 1 2 3 4 ## [2,] 1 1 2 3 4 ## [3,] 1 1 2 3 5 ## [4,] 1 1 2 3 6 grid.arrange(grobs = c(gg_list1, gg_list2), layout_matrix = my_layout)

Ответ 1