【发布时间】:2014-12-05 02:24:38
【问题描述】:
我有这个示例数据
library("parallel")
DV<-runif(1000,min=-5,max=5)
RV_1<-runif(1000,min=-5,max=5)
RV_2<--runif(1000,min=-5,max=5)
df<-data.frame(DV,RV_1,RV_2)
fun<-function(x){
n<-neuralnet(DV~RV_1+RV_2,data=df,hidden=x)
return(n)
}
如果我使用例如
mclapply(c(1:5),fun)
任务管理器显示只有 2 个内核可以 100% 工作。 但是如果我检查这个
detectCores()
它可以看到所有 4 个核心。 任何建议如何解决它? 我买了新的 i5-4960k 来提高我的计算速度,但这样也不会好多少。谢谢大家
【问题讨论】:
-
通过使用 mclapply(c(1:5),fun,mc.cores=4) 解决
-
看到你解决了,你可以把你的答案放在下面并接受它,这样其他遇到问题的人就知道你有答案了。
-
谢谢,这表明我可以在2天内接受答复。
标签: r parallel-processing