R，如何通過使用ggplot2在循環之後在同一圖像中繪製多個圖？

Question

我在R中有一個腳本，使用ggplot2在同一個循環中創建不同的圖。當循環結束時，我希望它在獨特的圖像中打印所有的圖。

這是代碼的樣子：

dim = 6; 
vectPlot = c(); 
for (i in 1:dim) 
{ 
    vectPlot[i] = qplot(...) 
} 

我需要的東西就像一個printManyPlotsInOneImage(vectPlot)' function. I tried with的multiplot（）」，但沒有工作（沒有任何反應）。

你知道我該如何處理這個問題嗎？

更新：我需要qplot（）函數的輸入來改變循環內部。 程序是這樣的：

dim = 6; 
vectPlot = c(); 
dataArray = read.table(....) 
for (i in 1:dim) 
{ 
    vectPlot[i] = qplot(dataArray[i],...) 
} 

我怎麼能在這種情況下lapply有效地使用？

Answer 1

編輯您的代碼地塊分配給一個列表

dim2 = 1:6 #don't use dim, it's buil-in funtion 
vecPlot= lapply(dim2, 
       function(x) qplot(rnorm(20,x), 
       main = paste0("Histogram with mean = ",x))) 
       #modify qplot as appropriate 

你可以做的multiplot，但因爲你的地塊都在列表中，它不工作。 嘗試本作的multiplot執行在列表

do.call(multiplot, vecPlot) 

我建議您閱讀?do.call更好地瞭解發生了什麼事情。 爲了實現更好的控制，使用ncols，nrows（指定您想要的圖形的列數和行數以及可能的常用標題）使用gridExtra包中的grid.arrage。您需要安裝該軟件包 試試這個

library(gridExtra) 
do.call(grid.arrange,vecPlot) 

最後回答您的問題更新

dim2 = 1:6; 
dataArray = read.table(....) 
vecPlot = lapply(dim2, function(x) { 
     qplot(dataArray[x],...) 
}