В R Как объединить список сюжета с другим сюжетом и отобразить его в одном окне

Question

Я использовал ggplot2 для создания сюжета. , Здесь plotmodel - это функция, которая генерирует отдельный график на основе входных данных, и я использую myplot , который представляет собой список для хранения графиков, возвращаемых plotmodel .

for (i in 1:le) {
myplot[[i]]<-plotmodel(df2,colnames(df2)[i],z[[i]],xnames[i])

}

Я также создал один сюжет под названием " plotinfec ".

Мои графики работают нормально, если я выполняю их индивидуально. Можете ли вы помочь или дать предложение о том, как я могу отобразить plotinfec и myplot в одном окне.

Answer 1

Попробуйте:

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)