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

v0.2.8.8 BUG: ShinyGR now returns an error message when ObsDF is a list...

v0.2.8.8 BUG: ShinyGR now returns an error message when ObsDF is a list containing objects other than data.frame objects
parent aa76f894
Package: airGRteaching
Type: Package
Title: Teaching Hydrological Modelling with the GR Rainfall-Runoff Models ('Shiny' Interface Included)
Version: 0.2.8.7
Version: 0.2.8.8
Date: 2020-02-05
Authors@R: c(
person("Olivier", "Delaigue", role = c("aut", "cre"), comment = c(ORCID = "0000-0002-7668-8468"), email = "airGR@inrae.fr"),
......
......@@ -14,7 +14,7 @@ output:
### 0.2.8.7 Release Notes (2020-02-05)
### 0.2.8.8 Release Notes (2020-02-05)
#### New features
......
......@@ -10,6 +10,11 @@ ShinyGR <- function(ObsDF = NULL, DatesR = NULL, Precip = NULL, PotEvap = NULL,
stop("Null values non suitable for 'SimPer'.")
}
if (!is.null(ObsDF)) {
if (!is.list(ObsDF) | inherits(ObsDF, "PrepGR")) {
stop("'ObsDF' must be a (list of) 'data.frame'.")
}
}
if (is.data.frame(ObsDF)) {
ObsDF <- list(ObsDF)
}
......
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