r - 包括几个带网格的格子图

Question

我想知道是否有人可以指出在网格中排列几个用格子创建的图形的方法。

这个例子：

    library(lattice) 
attach(mtcars)

# create factors with value labels 
gear.f<-factor(gear,levels=c(3,4,5),
               labels=c("3gears","4gears","5gears")) 
cyl.f <-factor(cyl,levels=c(4,6,8),
               labels=c("4cyl","6cyl","8cyl")) 

# kernel density plot 
a<-densityplot(~mpg, 
            main="Density Plot", 
            xlab="Miles per Gallon")

好的，所以我创建了一个情节。

在阅读了上一篇文章后，我已经学会了如何使用 grid.arranje 将其排列在网格中

library(latticeExtra)

library(gridExtra)

grid.arrange(a,a, nrow=2,ncol=2)

我想生成一个图表，第一行有两个图，第二行有两个图，第三行和第四行有三个图。

我尝试了以下方法，女巫不起作用

grid.arrange(a,a,a,a,ncol=2,(arrangeGrob(a,a,a,a,a,a,ncol=2)))

从我的代码开始，是否可以做我想要的？

Answer 1

使用 gridExtra，

library(gridExtra)
a <- rectGrob(gp=gpar(fill="grey90"))
row12 <- arrangeGrob(a, a, a, a, ncol=2)
row34 <- arrangeGrob(a, a, a, a, a, a, ncol=3)
grid.arrange(row12, row34, ncol=1)