2

我正在使用 doParallel 和 foreach 包在多个内核上运行我的代码。我的代码类似于

fun1 <- function(param1, param2, param3)
{
   do something
   fun2(param4, param5, param6)

   foreach(param4 = 1:length(param1) %dopar% fun2(param4, param5, param6)
   return something
}

fun2 <- function(param4, param5, param6)
{
   do something
   fun3(param7, param8, param9)
   return something
}

fun3 <- function(param7, param8, param9)
{
   do something
   fun4(param10, param11, param12)
   return something
}

fun4 <- function(param10, param11, param12)
{
   do something

   return something
}

Call: fun1(a,b,c)

当我调用 fun1 时,fun2 的第一个实例已成功执行,但我使用 foreach 调用 fun2 的实例在 fun2 中出现错误(param4,param5,:任务 1 失败 - “找不到函数“fun2””

4

0 回答 0