R/zzz.R

In r-hyperspec/hyperSpec: Work with Hyperspectral Data, i.e. Spectra + Meta Information (Spatial, Time, Concentration, ...)

.onAttach <- function(libname, pkgname) {
  unlockBinding(".options", asNamespace("hyperSpec"))

  desc <- utils::packageDescription("hyperSpec")
  first_url <- sub(",.*$", "", desc$URL) # To use the first URL only

  packageStartupMessage(
    "\n\n",
    "Package ", desc$Package, " (version ", desc$Version, ")\n\n",
    "To get started, try: \n",
    '   vignette("', desc$Package, '", package = "', desc$Package, '")', "\n",
    "   package?", desc$Package, "\n",
    '   browseVignettes(package = "', desc$Package, '")\n',
    '   vignette(package = "', desc$Package, '")', "\n",
    # '   browseURL("', first_url, '") # Online documentation \n',
    "\n",
    "If you use this package, please cite it appropriately.\n",
    "The correct reference is given by:\n",
    '   citation("', desc$Package, '")\n\n',
    "The project's website:\n   ", first_url, "\n\n",

    "IMPORTANT! \n",
    "Existing users of 'hyperSpec' will find that many functions either have ",
    "been renamed in favor of more consistent names or moved to other ",
    "packages. To help you update your workflows, the list of the renamed and ",
    "moved functions resides in the NEWS file of hyperSpec's documentation: \n\n",
    'help(package = "hyperSpec")',

    sep = ""
  )
}