Я пытаюсь использовать foreach, и у меня возникают проблемы с масштабированием функции .combine. Например, вот простая функция объединения

MyComb <- function(part1,part2){
          xs <- c(part1$x,part2$x)
          ys <- c(part1$y,part2$y)
          return(list(xs,ys))
          }

Когда я использую эту функцию для объединения оператора foreach с итератором, отличным от 2, он возвращает его неправильно. Например это работает:

   x = foreach(i=1:2,.combine=MyComb) %dopar% list("x"=i*2,"y"=i*3)

Но не это

 x = foreach(i=1:3,.combine=MyComb) %dopar% list("x"=i*2,"y"=i*3)

Есть ли способ обобщить функцию объединения, чтобы сделать ее масштабируемой до n итераций?