tests/basic.R

In mespe/Rcimis: R interface to the CIMIS (California Irrigation Management System) REST API

if(!is.na(getOption("Rcimis_key", NA))) {
 library(Rcimis)
 d = CIMISweather("2015-01-01",  "2015-01-20", 12)
 
 d = CIMISweather("2015-01-01",  "2015-01-20", 12, dataItems = c("day-air-tmp-min", "day-air-tmp-avg"))

 de = CIMISweather("2015-01-01",  "2015-01-20", 12, dataItems = c("day-air-tmp-min", "day-air-tmp-avg"), unitOfMeasure = "E")

 de = CIMISweather("2015-01-01",  "2015-01-20", 12, dataItems = c("day-air-tmp-min", "day-air-tmp-avg"), prioritizeSCS = FALSE, .opts = list(verbose = TRUE))
}