和R自带的绘图系统不同，ggplot2不能直接通过par(mfrow) 或者 layout()来排版多张图片。终于发现，其实可以通过一个『gridExtra』包来搞定：
require(gridExtra) plot1 <- Make_Smoking_Plot_TCGA("CLDN18", type = "Normal") plot2 <- Make_Smoking_Plot_TCGA("CLDN18", type = "Tumor") plot3 <- Make_Smoking_Plot_TCGA("CLDN18", type = "Tumor", exp_data = Expression_TvN_TCGA_Sel1) plot4 <- Make_Smoking_Plot_TCGA("CLDN18", type = "Tumor", exp_data = Expression_TvN_TCGA_Sel2) plot5 <- Make_Smoking_Plot_TCGA("CLDN18", type = "Tumor", exp_data = Expression_TvN_TCGA_Sel3) plot6 <- Make_Smoking_Plot_TCGA("CLDN18", type = "Tumor", exp_data = Expression_TvN_TCGA_Sel4) grid.arrange(plot1, plot2, plot3, plot4, plot5, plot6, ncol=2)
Reference： http://rstudio-pubs-static.s3.amazonaws.com/2852_379274d7c5734f979e106dcf019ec46c.html