在多个页面上使用grid.arrange或通过layout_matrix使用marrangeGrob [英] use grid.arrange over multiple pages or marrangeGrob with a layout_matrix

问题描述

我想在多个页面上使用以下layout_matrix布置图.

i want to arrange plots with the following layout_matrix over multiple pages.

library(gridExtra)
library(ggplot2)

layout <- rbind(c(1,2,3,4),
                    c(1,2,3,4),
                    c(1,2,3,4),
                    c(5,5,5,5))
p <- list()
for(i in 1:15) {
    ifelse(i %% 5 > 0,
        p[[i]] <- ggplot(mtcars, aes(wt, mpg)) + geom_point() + ggtitle(paste("plot:",i)),
        p[[i]] <- tableGrob(mtcars[5:7,],rows = NULL)
    )
}

如果我只有一页:(简单)

if i have only one page: (easy)

grid.arrange(grobs=p[1:5],layout_matrix=layout)

如果我要多个页面:(我松开了所有图案)

if i want multiple pages: (i loose all my pattern)

marrangeGrob(grobs=p,nrow=4,ncol=2)

pls为我提供了一个通用解决方案，可以在多个页面上使用layout_matrix.

推荐答案

这似乎可行，

marrangeGrob(grobs=p, nrow=1, ncol=5, layout_matrix=layout)

(偶然地)

marrangeGrob 只是for循环和grid.arrange的薄包装，因此，如果您需要比这种幸运的解决方法更精致的东西，则可能应根据需要修改代码.

marrangeGrob is just a thin wrapper around a for loop and grid.arrange, so in case you need something more refined than this lucky workaround you should probably modify the code to your needs.

这篇关于在多个页面上使用grid.arrange或通过layout_matrix使用marrangeGrob的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！