如何將多個調用組合到一個函數中？

Question

我想概括我的函數調用，以便能夠將這些調用作爲參數傳遞給第二個函數。

在我來說，我有我作爲存儲例如列表複式ggplots：

year.plots <- lapply(c("2008","2009","2010","2011","2012","2013","2014"), 
    FUN=function(x){ 
    ggplot(data=french.temp.load[french.temp.load$Year==x,], 
    aes(x=Temperature_K,y=load,color=Month)) + 
    geom_point(alpha=0.5) 
    }) 

現在我想過時他們grid.arrange。是否有可能做這樣的事情？

grid.arrange(seq(year.plots),ncol=3) 

感謝

Answer 1

我想這是你想要的。很難確定，因爲我經常不使用網格材料，也沒有提供可重現的例子。

# Make example data 
p <- qplot(rnorm(30)) 
year.plots <- list(p, p, p, p, p, p, p) 
# This will basically construct the call 
# grid.arrange(p, p, p, p, p, p, p, ncol = 3) 
do.call(grid.arrange, c(year.plots, ncol = 3))