Commit bf9aad45 authored by unknown's avatar unknown
Browse files

v0.1.11.24 add "donttest" tag in examples of ShinyGR and dyplot.default in...

v0.1.11.24 add "donttest" tag in examples of ShinyGR and dyplot.default in order to avoid error caused by the version number of the dygraphs package during CRAN check
parent a80106ef
Package: airGRteaching
Type: Package
Title: Tools to Simplify the Use of the airGR Hydrological Package for Education (Including a Shiny Interface)
Version: 0.1.11.23
Version: 0.1.11.24
Date: 2018-02-01
Authors@R: c(person("Olivier", "Delaigue", role = c("aut", "cre"), email = "airGR@irstea.fr"), person("Laurent", "Coron", role = c("aut")), person("Pierre", "Brigode", role = c("aut")), person("Guillaume", "Thirel", role = c("ctb")))
Depends: airGR (>= 1.0.9.43)
......
......@@ -56,8 +56,6 @@ Laurent Coron,
Pierre Brigode}
\examples{
## Not run:
library(airGR)
## data.frame of observed data of a low-land basin
......@@ -71,16 +69,13 @@ BV_L0123002 <- BasinObs[5000:9999, c("DatesR", "P", "E", "Qmm", "T")]
BI_L0123002 <- BasinInfo
## Interactive simulation step using default parameters
if (interactive()) {
\donttest{if (interactive()) {
ShinyGR(ObsDF = list("Low-land basin" = BV_L0123001, "Mountainous basin" = BV_L0123002),
ZInputs = list(NULL, median(BI_L0123002$HypsoData)),
HypsoData = list(NULL, BI_L0123002$HypsoData),
NLayers = list(5, 5),
SimPer = list(c("1994-01-01", "1998-12-31"), c("2004-01-01", "2006-12-31")),
theme = "United")
}
## End(**Not run**)
}}
}
......@@ -59,8 +59,6 @@
\examples{
## Not run:
library(airGR)
## data.frame of observed data
......@@ -69,17 +67,15 @@ BasinObs2 <- BasinObs[, c("DatesR", "P", "E", "Qmm", "T")]
## Preparation of observed data for modelling
PREP <- PrepGR(ObsDF = BasinObs2, HydroModel = "GR4J", CemaNeige = FALSE)
dyplot(PREP, main = "Observation")
\donttest{dyplot(PREP, main = "Observation")}
## Calibration step
CAL <- CalGR(PrepGR = PREP, CalCrit = "KGE2",
WupPer = NULL, CalPer = c("1990-01-01", "1993-12-31"))
dyplot(CAL, main = "Calibration")
\donttest{dyplot(CAL, main = "Calibration")}
## Simulation
SIM <- SimGR(PrepGR = PREP, CalGR = CAL, EffCrit = "KGE2",
WupPer = NULL, SimPer = c("1994-01-01", "1998-12-31"))
dyplot(SIM, main = "Simulation")
## End(**Not run**)
\donttest{dyplot(SIM, main = "Simulation")}
}
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