的foreach錯誤「無法找到函數」％做％「」

我運行此代碼的foreach錯誤「無法找到函數」％做％「」

.... 
niters = 1000 
mFR <- foreach(i=1:iters, .combine=rbind) %dopar% { 
      foreach(j=1:iters, .combine=c) %do% { 
       mp2 <- mp[sample(1:1e6, iters)] 
       fexist = 0 
       if (mp2[j]>mR12[i]) { 
        Frv = 1 
        fexist = 1 
       } else if (mp2[j]<=mRy2[i]) { 
        Frv = 0 
        fexist = 1 
       } else { 
        if (mRy2[i]>mR12[i]) { 
         Frv = 1 
        } else { 
         fexist = 1 
         b = mDMDuc1[i]/(1-mR12[i]/mRy2[i]) 
         m = -b/mRy2[i] 
         DMDp = m*mp2[j] + b 
         Frv = (DMDp - 0)/(mDMDc2[i] - 0) 
        } 
       } 
       if (fexist==1) { 
       mFR <- matrix(Frv, ncol=1, nrow = 1) 
       mFR 
       } 
      } 
}

任何想法，爲什麼這個錯誤發生時，我得到

Error in { : task 1 failed - "could not find function "%do%""

？謝謝！

來源

2014-09-11 jpcgandre

它的工作原理！完善。謝謝 – jpcgandre 2014-09-11 10:21:26

您的並行工作人員每個都在乾淨的R會話中運行，因此您必須在每個工人中加載foreach程序包。

嘗試增加.packages="foreach"你的第一線，即：

mFR <- foreach(i=1:iters, .combine=rbind, .packages="foreach") %dopar% ...{

附加說明：該foreach包定義操作%:%，旨在簡化這種類型的嵌套for循環。

要了解更多信息，請

library(foreach) 
vignette("nested")

來源

2014-09-11 10:22:19 Andrie

的foreach錯誤 「無法找到函數 」％做％「」

回答

相關問題

的foreach錯誤「無法找到函數」％做％「」