样本数据:
rdata <- data.frame(y=rnorm(1000,2,2),v1=rnorm(1000,1,1),v2=rnorm(1000,3,3),
v3=rnorm(1000,4,4),v4=rnorm(1000,5,5))
这不符合我的需要:
library(lattice)
library(gridExtra)
plot1 <- lapply(1:2, function(i) {bwplot(~rdata[,i],rdata)})
plot2 <- lapply(1:3, function(i) {bwplot(~rdata[,i],rdata)})
plot3 <- lapply(1:4, function(i) {bwplot(~rdata[,i],rdata)})
print(do.call(grid.arrange, c(plot1,plot2,plot3)))
我想按行绘制图表,以便在这种情况下,plot1
在第一行的 1 个图中仅显示 2 个图表、第二行 3 个图表和第三行 4 个图表。这个怎么做?
编辑:所需的输出: