r - ffdf mapply 関数による R Foreach 並列処理

Question

NGA パッケージから関数を適用する「シナリオ」という名前の大きな ffdf があります。私はすでに 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 であまり成功していません。速度を上げる必要があります。どんな助けも大歓迎です。ありがとう