使用多个mclappy、parlappy

我正在尝试链接多个mclappy/parlappy：

my_function<-function(x){
do something;
mclapply()
}

问题是我经常会遇到以下错误：

计划核心3、57、54、8、23、17、53、18、22、28、41、25、30在用户代码中遇到错误，作业的所有值都将受到影响

有趣的是，如果我在我的ubuntu机器上运行这个程序，我不会出错，但是当我在CentOS机器上运行这个程序时，我会出错。当我使用parlappy执行第二步时，也会发生类似的情况

我也尝试过：

cl <- makePSOCKcluster(no_cores)
clusterExport(cl,c("function_main_simulation","a1","a2","no_cores"))
system.time(parLapply(cl,1:10000,function(i)(function_main_simulation(a1,a2))))
stopCluster(cl)

cl
cl <- makePSOCKcluster(no_cores)
clusterExport(cl,c("function_main_simulation","a1","a2","no_cores"))
system.time(parLapply(cl,1:10000,function(i)(function_main_simulation(a1,a2))))
stopCluster(cl)