R Параллельная обработка Foreach с функцией ffdf mapply

Question

У меня есть большой ffdf с именем 'Scenarios', к которому я применяю функцию из пакета 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, и мне нужно ускориться, любая помощь будет принята с благодарностью. Спасибо