.onAttach <- function(libname, pkgname) {
packageStartupMessage(paste0("Set default RNG to L'Ecuyer-CMRG for a safe ",
"parallel simulation."))
}
.onLoad <- function(libname, pkgname) {
RNGkind("L'Ecuyer-CMRG")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.