search for: initseeds

Displaying 1 result from an estimated 1 matches for "initseeds".

Did you mean: init_seed
2012 Jan 13
0
Example of "task seeds" with R parallel. Critique?
...obalEnv) currentStream <<- n } useStream(n=1, origin=TRUE) rnorm(4) currentStream useStream(n=2, origin=TRUE) rnorm(4) currentStream ## Now, make that work in a clustered environment cl <- makeCluster(9, "MPI") ## run on worker, so can retrieve seeds for particular run initSeeds <- function(p = NULL){ currentStream <<- 1 projSeeds[[p]] } clusterEvalQ(cl, { RNGkind("L'Ecuyer-CMRG") }) clusterExport(cl, c("projSeeds", "useStream", "initSeeds")) someHorrendousFunction <- function(run, parm){ currentStream &lt...