R/zzz.R

In sergioventurini/SAuR: Sensitivity Analysis Using R

# # Package-wide global variables
# .SAuREnv <- new.env()

# #' @importFrom utils globalVariables
# #' @importFrom tools file_path_as_absolute
# .onLoad <- function(lib, pkg){
#   # needed to avoid annoying notes in R CMD CHECK
#   # (see https://github.com/tidyverse/magrittr/issues/29)
#   if (getRversion() >= "2.15.1") {
#     # utils::globalVariables(c(".", "S", "cl", "italic", "lbl", "p_i", "p_j", "p", "G", "DCIC"))
#   }
#   # .SAuREnv$path.to.me <- tools::file_path_as_absolute(lib)
#   # .SAuREnv$nlog.double.eps <- -log(.Machine[["double.eps"]])
#   # .SAuREnv$allowedfamilies <- c("binomial", "multinomial", "gaussian", "poisson")
#   # .SAuREnv$current_p <- 2
#   # .SAuREnv$current_G <- 3
#   # .SAuREnv$current_family <- "binomial"
# }

.onAttach <- function(lib, pkg) {
  packageStartupMessage(sprintf("Package %s (%s) loaded.\nTo cite, type citation(\"%s\")",
    pkg, utils::packageDescription(pkg)$Version, pkg))
}

.onUnload <- function(lib) {
	library.dynam.unload("SAuR", lib)
}