我用ggplot2来创建情节。 。这里plotmodel是一个根据输入生成单独的图的函数,我使用myplot这是一个列表来存储plotmodel返回的图。
for (i in 1:le) {
myplot[[i]]<-plotmodel(df2,colnames(df2)[i],z[[i]],xnames[i])
}
我还创建了一个名为“plotinfec”的情节。
如果我单独执行,我的情节可以正常工作。关于如何在一个窗口中显示plotinfec和myplot,请您帮忙或提出建议。
试试这个:
library(ggplot2)
library(gridExtra)
do.call(grid.arrange, c(list(plotinfec), myplot))
例:
plotinfec <- ggplot(cars, aes(speed, dist)) + geom_density2d()
myplot <- list()
myplot[[1]] <- ggplot(cars, aes(speed, dist)) + geom_point()
myplot[[2]] <- ggplot(cars, aes(speed, dist)) + geom_hex()
myplot[[3]] <- ggplot(cars, aes(speed, dist)) + geom_line()
plotSW <- do.call(grid.arrange, c(list(plotinfec), myplot))
plot(plotSW)