R 使用McLappy的并行包只使用2个内核，而不是全部4个

我有这个示例数据

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)
}

任务管理器显示，只有2个内核可以100%工作。 但是如果我查一下这个

detectCores()

它可以看到所有4个核心。 有什么建议可以解决吗？

---

我买了新的i5-4960k来提高我的计算速度，但这样不会更好。谢谢任何人

用mclappy（c（1:5），fun，mc.cores=4）解决

用mclappy（c（1:5），fun，mc.cores=4）解决看到你解决了问题，你可以把你的答案放在下面并接受它，这样其他遇到问题的人都知道你有答案。谢谢，这表明我可以在两天内接受答案。

detectCores()