R/zzz.R

In tjthurman/BAHZ: Bayesian Analysis of Hybrid Zones

# From rstantools
.onLoad <- function(libname, pkgname) {
  modules <- paste0("stan_fit4", names(stanmodels), "_mod")
  for (m in modules) loadModule(m, what = TRUE)
}

# modified from the rstan startup message
.onAttach <- function(...) {
  packageStartupMessage("Running bahz in parallel may speed up model fitting.\n",
                        "See startup message from Rstan, below:\n",
                        "\n",
                        "For execution on a local, multicore CPU with excess RAM we recommend calling\n",
                        "options(mc.cores = parallel::detectCores())")
}