En raison d'une défaillance matérielle, les jobs d'intégration continue peuvent échouer sans raison évidente sur les runners partagés. Les disques incriminés devraient être changés en fin de semaine. Merci de votre compréhension.

Commit f0c98999 authored by Delaigue Olivier's avatar Delaigue Olivier
Browse files

v0.2.8.58 DOC: add examples to expain differnt types of inputs (no Qobs end...

v0.2.8.58 DOC: add examples to expain differnt types of inputs (no Qobs end independant vectors) in the ShinyGR doc
parent 63f8599e
Package: airGRteaching
Type: Package
Title: Teaching Hydrological Modelling with the GR Rainfall-Runoff Models ('Shiny' Interface Included)
Version: 0.2.8.57
Version: 0.2.8.58
Date: 2020-02-27
Authors@R: c(
person("Olivier", "Delaigue", role = c("aut", "cre"), comment = c(ORCID = "0000-0002-7668-8468"), email = "airGR@inrae.fr"),
......
......@@ -4,7 +4,7 @@
### 0.2.8.57 Release Notes (2020-02-26)
### 0.2.8.58 Release Notes (2020-02-26)
#### New features
......
......@@ -40,7 +40,7 @@ ShinyGR(ObsDF = NULL,
\item{NamesObsBV}{(optional) [character] vector of values to define the data inputs name(s) (if the ObsDF list is not already named)}
\item{theme}{(optional) [character] alternative stylesheet [\code{"RStudio"} (default), \code{"Cerulean"}, \code{"Cyborg"}, \code{"Flatly"}, \code{"United"} or \code{"Yeti"}]}
\item{theme}{(optional) [character] alternative stylesheet [\code{"RStudio"} (default), \code{"Cerulean"}, \code{"Cyborg"}, \code{"Flatly"}, \code{"Inrae"}, \code{"Saclay"}, \code{"United"} or \code{"Yeti"}]}
}
......@@ -72,7 +72,7 @@ data(L0123002, package = "airGR")
BV_L0123002 <- BasinObs[5000:9999, c("DatesR", "P", "E", "Qmm", "T")]
BI_L0123002 <- BasinInfo
## Interactive simulation step using default parameters
## Interactive simulation when inputs set by using a data.frame
\donttest{if (interactive()) {
ShinyGR(ObsDF = list("Low-land basin" = BV_L0123001, "Mountainous basin" = BV_L0123002),
ZInputs = list(NULL, median(BI_L0123002$HypsoData)),
......@@ -81,5 +81,22 @@ BI_L0123002 <- BasinInfo
SimPer = list(c("1994-01-01", "1998-12-31"), c("2004-01-01", "2006-12-31")),
theme = "United")
}}
## Interactive simulation using when inputs set by using independant vectors
\donttest{if (interactive()) {
ShinyGR(DatesR = BV_L0123001$DatesR, Precip = BV_L0123001$P,
PotEvap = BV_L0123001$E, Qobs = BV_L0123001$Qmm,
SimPer = c("1994-01-01", "1998-12-31"),
theme = "Cyborg")
}}
## Interactive simulation for an ungauged catchment (i.e. no observed discharge available)
## Observed discharge set to NA, in the Qobs argument or in the 4th column of the data.frame if the ObsDF argument is used
\donttest{if (interactive()) {
ShinyGR(DatesR = BV_L0123001$DatesR, Precip = BV_L0123001$P,
PotEvap = BV_L0123001$E, Qobs = NA,
SimPer = c("1994-01-01", "1998-12-31"),
theme = "Saclay")
}}
}
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment