R/zzz.R

In baytrends: Long Term Water Quality Trend Analysis

#' @importFrom utils packageVersion

.onLoad <- function(libname = find.package("baytrends"), pkgname = "baytrends"){

  repos <- getOption("repos")
  repos["USGS"] <- "http://owi.usgs.gov/R"
  options(repos = repos)
  invisible(repos)

  # declaration of global variables (http://stackoverflow.com/questions/9439256)
  if(getRversion() >= "2.15.1")
    utils::globalVariables(c("begin", "methodsList", "figNum"))
  invisible()
}

.onAttach <-  function(libname = find.package("baytrends")
                       , pkgname = "baytrends"){
  # packageStartupMessage(paste0("**baytrends v",packageVersion("baytrends")
  #," Notice.** This software program is preliminary or provisional and is 
  # subject to revision. This software program is for testing only, no warranty
  # , expressed or implied, is made as to the accuracy and functioning of the 
  # program and related program material nor shall the fact of distribution 
  # constitute any such warranty, and no responsibility is assumed in connection
  # therewith. This software is provided 'AS IS.' "))
  packageStartupMessage(paste0("Loading:baytrends v"
                               ,packageVersion("baytrends")))
  }