Reproducibility (I)

We ran the following code in your workspace:

library(doParallel)
cl.sock <- makeCluster(2, type = "PSOCK")
registerDoParallel(cl.sock)

Is the following code reproducible and why?

set.seed(100)
foreach (i = 1:2) %dopar% rnorm(3)

Possible Answers

Yes, because it sets the seed of an RNG.
Yes, because each node is a copy of the master process.
No, because each node is a copy of the master process.
No, because it sets the RNG seed only on the master process.