輸出列表

Question

比方說，我想用foreach在doParallel包返回不同尺寸的兩個數據幀的列表如下所示：

a<-NULL 
b<-NULL 
for(i in 1:100){ 
    a<-rbind(a,data.frame(input=i,output=i/2)) 
    if(i > 5){ 
    b<-rbind(b,data.frame(input=i,output=i^2)) 
    } 
} 
list(a,b) 

由於foreach回報一個對象，沒有（至少對我來說）明顯的方式做到foreach以上。

注意：這是一個非常簡化版本的問題，我實際上正在使用，所以通過使用lapply（或沿着這些線路）解決問題將不起作用。我的問題的精神是如何與foreach做到這一點。

Answer 1

我想通了。您必須定義您自己的功能，以完全按照您的方式組合列表。

#takes an arbitrary number of lists x all of which much have the same structure  
comb <- function(x, ...) { 
     mapply(rbind,x,...,SIMPLIFY=FALSE) 
} 

foreach(i=1:10, .combine='comb') %dopar% { 
     a<-rbind(a,data.frame(input=i,output=i/2)) 
     if(i > 5){ 
     b<-rbind(b,data.frame(input=i,output=i^2)) 
     } 
     list(a,b) 
}