Get, set and restore the state of the random number generator state.
get_random_seed() set_random_seed(seed) restore_random_seed(seed)
seed: (list()|integer(1))
seed
list()
integer(1)
Either an integer or the list returned gy get_random_seed().
get_random_seed()
get_random_seed() returns a list with two components random_seed and rng_kind or NULL if no seed was set; set_random_seed() and restore_random_seed() do not return anything.
random_seed
rng_kind
set_random_seed()
restore_random_seed()
These functions originate from the withr package.
withr
old_seed <- get_random_seed() on.exit(restore_random_seed(old_seed)) set_random_seed(42) value1 <- runif(1) set_random_seed(42) value2 <- runif(1) stopifnot(all.equal(value1,value2))
Useful links