R Foreach使用ffdf mapply函数并行处理

Question

我有一个名为＆＃39; Scenarios＆＃39;的大型ffdf。我正在从NGA包中应用一个函数。我已经在使用mychunks试图加快速度，但速度仍然很慢。我可以使用并行处理来运行它吗？使用Foreach包吗？我目前的代码如下所示：

PGA = (rep(NA,Nevs))
mychunks <- chunk(Scenarios)
for(myblock in mychunks){
  ScenariosINRAM <- Scenarios[myblock, ]
  PGA[seq(min(myblock), max(myblock))] <- mapply(Sa.ba,ScenariosINRAM$Magnitude,     ScenariosINRAM$Rjb, Vs30, ScenariosINRAM$Epsilon,T=0,rake=NA, U=0, SS=1, NS=0, RS=0, AB11=1)
 }

我对Foreach没有太大的成功，我需要加快速度，任何帮助都会非常感激。感谢