v1.2.9.17 BUG: no more warning when Qobs = NULL in plot.OutputsModel

DESCRIPTION

 Package: airGR
 Type: Package
 Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
-Version: 1.2.9.16
+Version: 1.2.9.17
 Date: 2019-03-18
 Authors@R: c(
   person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")),

NEWS.rmd

@@ -13,7 +13,7 @@ output:
 
 
 
-### 1.2.9.16 Release Notes (2019-03-18) 
+### 1.2.9.17 Release Notes (2019-03-18) 
 
 
 

R/plot.OutputsModel.R

@@ -28,7 +28,7 @@ plot.OutputsModel <- function(x, Qobs = NULL, IndPeriod_Plot = NULL, BasinArea =
     if (sum(is.na(Qobs)) != length(Qobs)) {
       BOOL_Qobs <- TRUE
     }
-  } else if (inherits(OutputsModel, "GR")) {
+  } else if (inherits(OutputsModel, "GR") & !is.null(Qobs)) {
     warning("Incorrect length of 'Qobs'. Time series of observed flow not drawn")
   }
   BOOL_Snow <- FALSE