R/read_modern_T.R

In jrpriceUPS/Math160UPS: Suite of Functions for Math 160 Classes at the University of Puget Sound

#' Read modern temperature
#'
#' Function to load modern temperature data.
#' @export
read_modern_T <- function(modern_T_website){
  modern_T  <- read.delim(modern_T_website,
                          sep = "", skip = 5,
                          col.names = c("year", "T_anomaly", "smoothed_T_anomaly"),
                          check.names = FALSE)
}