In lauraing/climatechangeimpacts:

knitr::opts_chunk$set(echo = TRUE)

library(tidyverse)
library(climatechangeimpacts)

# get data
data("UCSB_rain")

# test mean_daily function
test_mean_daily <- mean_daily(data = UCSB_rain, start = "2010-01-01", end = "2011-01-01")
test_mean_daily

# test annual_precip function
test_annual_precip <- annual_precip(data = UCSB_rain, years = 2015:2018)
test_annual_precip

# test watersupply function
test_watersupply <- watersupply(data = UCSB_rain)
test_watersupply

lauraing/climatechangeimpacts documentation built on March 29, 2020, 6:47 p.m.