作者celestialgod (天)
看板R_Language
标题Re: [问题] foreach 与 Parallel 回传多个matrix?
时间Wed Mar 8 23:30:51 2017
※ 引述《girl5566 (5566520)》之铭言：
: 文章分类提示:
: - 问题: 当你想要问问题时，请使用这个类别。
: [问题类型]:
: 程式谘询(我想用R 做某件事情，但是我不知道要怎麽用R 写出来)
: [软体熟悉度]:
: 新手(没写过程式，R 是我的第一次)
: [问题叙述]:
: 原本程式会有两个global变数，去承接for loop内的数值，但由於效能的关系
: 目前想把for loop改为 Parallel的方式，但仅查询到回传一个的方式，
: 是有解法可以处理这种状况呢?
: 原始情境:
: df <- NULL
: df1 <- NULL
: for(i in 1:10000){
: # 经运算後得到temp与temp1
: temp <- c(1,2,3,4)
: temp1 <- c(1,2,3,4)
: df <- rbind(df,temp)
: df1 <- rbind(df1, temp1)
: }
我对foreach不熟，不过foreach如果接doParallel底层是用parLapplyLB
我这里直接用parallel的parLapplyLB直接示范怎麽做~~~
library(parallel)
cl <- makeCluster(detectCores()-1L)
valueList <- parLapplyLB(cl, 1:150000, function(x){
temp <- rnorm(4)
temp1 <- rnorm(3)
return(list(temp, temp1))
})
df <- do.call(rbind, lapply(valueList , `[[`, 1))
df1 <- do.call(rbind, lapply(valueList , `[[`, 2))
stopCluster(cl)
--
R资料整理套件系列文：
magrittr #1LhSWhpH (R_Language) https://goo.gl/72l1m9
data.table #1LhW7Tvj (R_Language) https://goo.gl/PZa6Ue
dplyr(上.下) #1LhpJCfB,#1Lhw8b-s (R_Language) https://goo.gl/I5xX9b
tidyr #1Liqls1R (R_Language) https://goo.gl/i7yzAz
pipeR #1NXESRm5 (R_Language) https://goo.gl/zRUISx
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 36.232.184.141
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/R_Language/M.1488987055.A.28F.html
※ 编辑: celestialgod (36.232.184.141), 03/08/2017 23:33:37
1F：推 cywhale: foreach应该可以这样解，就把.combine="list" 这样写 03/09 12:37
2F：→ cywhale: 後面的do.call(rbind,.. 看起来就是rbinlist?~~ 03/09 12:39