R/epa_aqs_openWebPages.R

In pnwairfire/AirMonitorIngest: Data Ingest of Air Quality Data

#' @export
#'
#' @title Browse EPA AQS web pages
#'
#' @description
#' Open the relevant EPA AQS web pages in the default web browser. These pages
#' need to be regularly consulted when working with AQS data and it is helpful
#' to open them quickly.
#'
#' \itemize{
#' \item{\url{https://www.epa.gov/outdoor-air-quality-data/interactive-map-air-quality-monitors}}
#' \item{\url{https://www.epa.gov/criteria-air-pollutants/naaqs-table}}
#' \item{\url{https://www.epa.gov/aqs/aqs-code-list}}
#' \item{\url{https://aqs.epa.gov/aqsweb/airdata/FileFormats.html}}
#' \item{\url{https://aqs.epa.gov/aqsweb/airdata/download_files.html}}
#' }
#'

epa_aqs_openWebPages <- function() {

  utils::browseURL("https://www.epa.gov/outdoor-air-quality-data/interactive-map-air-quality-monitors")
  utils::browseURL("https://www.epa.gov/criteria-air-pollutants/naaqs-table")
  utils::browseURL("https://www.epa.gov/aqs/aqs-code-list")
  utils::browseURL("https://aqs.epa.gov/aqsweb/airdata/FileFormats.html")
  utils::browseURL("https://aqs.epa.gov/aqsweb/airdata/download_files.html")

}