R/zzz.R

Defines functions .onAttach

#' @importFrom utils citation
.onAttach <- function(...) {
  if (!interactive()) return()

  package_name = "gifti"
  x = citation(package_name)
  x = format(x, "text")
  x = paste(x, collapse = "\n\n")
  ack <- c(
    paste0("Please cite the ", package_name,
           " package using:\n"),
    x)

  packageStartupMessage(paste(strwrap(ack), collapse = "\n"))
}

Try the gifti package in your browser

Any scripts or data that you put into this service are public.

gifti documentation built on Nov. 12, 2020, 1:07 a.m.