R/user_guide.R

In ASICS: Automatic Statistical Identification in Complex Spectra

## User guide launcher
#' @title View ASICS User's Guide
#' @name ASICSUsersGuide
#' @export
#'
#' @importFrom utils browseURL
#'
#' @description Open the ASICS User's Guide (with default browser)
#'
#' @details The function \code{vignette("ASICS")} will find the short
#' ASICS vignette that describes the main functions and how to obtain the ASICS
#' User's Guide.
#' The User's Guide is not itself a true vignette because it is not
#' automatically generated during the package build process.
#' If the operating system is not Windows, then the HTML viewer used is the one
#' given by \code{Sys.getenv("R_BROWSER")}. The HTML viewer can be changed using
#' \code{Sys.setenv(R_BROWSER = )}.
#'
#' @return Open the ASICS User's Guide
#'
#' @examples
#' \dontrun{ASICSUsersGuide()}

ASICSUsersGuide <- function() {
  f <- system.file("doc", "ASICSUsersGuide.html", package = "ASICS")
  if (.Platform$OS.type == "windows") {
    shell.exec(f)
  } else {
    browseURL(paste0("file://", f))
  }
}