src/library/parallel/tests/multicore3.RR

library(parallel)

# use the same random numbers for all values
set.seed(1)
simplify2array(mclapply(rep(4, 5), rnorm))

set.seed(1)
simplify2array(mclapply(rep(4, 5), rnorm, mc.preschedule = FALSE,
                mc.set.seed = FALSE))