Paralelismo en R: memo[rándum]

Esta es una nota que me dejo a mí mismo sobre paralelización en R para no tener que ir buscándola en otras partes:

library(parallel)
 
foo <- function(i){
  Sys.sleep(i)
}
 
cl <- makeCluster(4)
 
system.time(parSapply(cl, 1:4, foo))
# user  system elapsed 
# 0.025   0.006   4.007 
 
system.time(sapply(1:4, foo))
# user  system elapsed 
# 0.039   0.033  10.001 
 
stopCluster(cl)