Commit 5c4b1c30 authored by Delaigue Olivier's avatar Delaigue Olivier
Browse files

v0.2.8.62 BUG: ShinyGR runs when independent arguments (with Hypsodata!) are...

v0.2.8.62 BUG: ShinyGR runs when independent arguments (with Hypsodata!) are used instead of the ObsDF argument
parent bee53fc1
Package: airGRteaching
Type: Package
Title: Teaching Hydrological Modelling with the GR Rainfall-Runoff Models ('Shiny' Interface Included)
Version: 0.2.8.61
Version: 0.2.8.62
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.61 Release Notes (2020-02-26)
### 0.2.8.62 Release Notes (2020-02-26)
#### New features
......
......@@ -19,6 +19,10 @@ ShinyGR <- function(ObsDF = NULL, DatesR = NULL, Precip = NULL, PotEvap = NULL,
ObsDF <- list(ObsDF)
}
if (!is.list(HypsoData)) {
HypsoData <- list(HypsoData)
}
if (!is.list(SimPer)) {
SimPer <- list(SimPer)
}
......@@ -138,7 +142,7 @@ ShinyGR <- function(ObsDF = NULL, DatesR = NULL, Precip = NULL, PotEvap = NULL,
}
names(SimPer) <- NamesObsBV
.GlobalEnv$.ShinyGR.hist <- list(list())#list(Param = list(), TypeModel = lsit(), Crit = list(), Qsim = list())
.GlobalEnv$.ShinyGR.args <- list(ObsDF = ObsDF, NamesObsBV = NamesObsBV,
DatesR = DatesR, Precip = Precip, PotEvap = PotEvap, Qobs = Qobs, TempMean = TempMean,
......
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