R/zzz.R

In rmcelreath/parasiticbehaviorsim: Simulation code for simple models of coevolution of social learning and parasitic behavior

.onLoad <- function(libname, pkgname) { }

.onAttach <- function(...) {
  theLib <- dirname(system.file(package = "parasiticbehaviorsim"))
  pkgdesc <- packageDescription("parasiticbehaviorsim", lib.loc = theLib)
  builddate <- gsub(';.*$', '', pkgdesc$Packaged)
  msg <- paste("parasiticbehaviorsim (Version ", pkgdesc$Version, ")\nInvoke ?parasiticbehaviorsim for documentation.", sep = "")
  packageStartupMessage(msg)
}