Searched refs:rlseed (Results 1 – 1 of 1) sorted by relevance
34 rlseed <- get("rlecuyerSeed", envir = .spdepOptions) functionVar35 if (storage.mode(rlseed) != "integer") rlseed <- as.integer(rlseed)36 if (length(rlseed) != 6L) rlseed <- rep(12345L, 6)37 parallel::clusterSetRNGStream(cl, iseed=rlseed)