Commit 130f7e99 authored by Delaigue Olivier's avatar Delaigue Olivier
Browse files

v0.2.10.101 docs(man): review minor typo in ShinyGR example

parent 15e3b4ab
Pipeline #18769 passed with stages
in 1 minute and 32 seconds
Package: airGRteaching
Type: Package
Title: Teaching Hydrological Modelling with the GR Rainfall-Runoff Models ('Shiny' Interface Included)
Version: 0.2.10.100
Date: 2020-12-21
Version: 0.2.10.101
Date: 2020-01-04
Authors@R: c(
person("Olivier", "Delaigue", role = c("aut", "cre"), comment = c(ORCID = "0000-0002-7668-8468"), email = "airGR@inrae.fr"),
person("Laurent", "Coron", role = c("aut"), comment = c(ORCID = "0000-0002-1503-6204")),
......
......@@ -4,7 +4,7 @@
### 0.2.10.100 Release Notes (2020-12-21)
### 0.2.10.101 Release Notes (2020-01-04)
#### New features
......
......@@ -91,8 +91,10 @@ BV_L0123001m <- SeriesAggreg(BV_L0123001[BV_L0123001$DatesR < "2000-06-01", ],
## Interactive simulation using when inputs set by using independant vectors
\donttest{if (interactive()) {
ShinyGR(DatesR = BV_L0123002$DatesR, Precip = BV_L0123002$P,
PotEvap = BV_L0123002$E, Qobs = BV_L0123002$Qmm,
ShinyGR(DatesR = BV_L0123002$DatesR,
Precip = BV_L0123002$P,
PotEvap = BV_L0123002$E,
Qobs = BV_L0123002$Qmm,
Temp = BV_L0123002$T,
ZInputs = median(BI_L0123002$HypsoData),
HypsoData = BI_L0123002$HypsoData,
......@@ -106,8 +108,10 @@ BV_L0123001m <- SeriesAggreg(BV_L0123001[BV_L0123001$DatesR < "2000-06-01", ],
## 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,
ShinyGR(DatesR = BV_L0123001$DatesR,
Precip = BV_L0123001$P,
PotEvap = BV_L0123001$E,
Qobs = NA,
SimPer = c("1994-01-01", "1998-12-31"),
NamesObsBV = "Low-land basin",
theme = "Cyborg")
......@@ -116,7 +120,7 @@ BV_L0123001m <- SeriesAggreg(BV_L0123001[BV_L0123001$DatesR < "2000-06-01", ],
## Interactive simulation when inputs are at different time steps
\donttest{if (interactive()) {
ShinyGR(ObsDF = list("Low-land basin [daily]" = BV_L0123001,
"Low-land basin [monthly]" = BV_L0123001m),
"Low-land basin [monthly]" = BV_L0123001m),
SimPer = list(c("1994-01-01", "1998-12-01"),
c("1994-01-01", "1998-12-01")),
theme = "Flatly")
......
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