Nothing
## ----include = FALSE----------------------------------------------------------
knitr::opts_chunk$set(
collapse = TRUE,
comment = "#>"
)
## ----setup--------------------------------------------------------------------
library(aws.wrfsmn)
## ----echo = FALSE, results = FALSE--------------------------------------------
data(eva)
## -----------------------------------------------------------------------------
head(eva)
## -----------------------------------------------------------------------------
test.predictors <- c('OUT_PREC',
'OUT_EVAP',
'OUT_RUNOFF',
'OUT_BASEFLOW',
'OUT_SOIL_MOIST_lyr_1',
'OUT_EVAP_CANOP',
'OUT_SURF_TEMP')
## -----------------------------------------------------------------------------
mg <- multiple.guidance(input.data = eva, predictand = 'evapo_obs', predictors = test.predictors)
mg
## -----------------------------------------------------------------------------
evaluation.eva <- mg.evaluation(input.data = eva, predictand = 'evapo_obs', predictors = test.predictors, var.model = 'OUT_EVAP', lmodel = mg)
head(evaluation.eva)
## ----out.width = "100%", fig.align = "center", echo=FALSE---------------------
ploting(daily2monthly(evaluation.eva[[1]]))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.