R/zzz.R

In muschellij2/fslr: Wrapper Functions for 'FSL' ('FMRIB' Software Library) from Functional MRI of the Brain ('FMRIB')

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

  package_name = "fslr"
  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"))
}