R/get_seed.R

Defines functions get_seed

Documented in get_seed

get_seed <- function() {
  #Use system time and process id as seed.
  return(as.integer((as.double(Sys.time())*1000+Sys.getpid()) %% 1000))
}
amoloudi/R-PKG-Distributions documentation built on May 23, 2019, 7:32 a.m.