diff --git a/DESCRIPTION b/DESCRIPTION index 2d756c580dc00992fc8dc1380d67330d70319be2..550c6289db7b03725a347f8a7023e144ef60a2cc 100644 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: airGR Type: Package Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling -Version: 1.3.2.54 +Version: 1.3.2.55 Date: 2019-11-19 Authors@R: c( person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")), diff --git a/NEWS.md b/NEWS.md index 31b414a5bfd230eb7a292bae6358a92d7459877a..abc7dad4cfa5305a09ac8ac660c03b2e4f24833e 100644 --- a/NEWS.md +++ b/NEWS.md @@ -2,7 +2,7 @@ -### 1.3.2.54 Release Notes (2019-11-19) +### 1.3.2.55 Release Notes (2019-11-19) #### New features diff --git a/R/plot.OutputsModel.R b/R/plot.OutputsModel.R index cca9dca28da1ca686f1e329328b78a301d7f510a..85d2418e740c4b762e2119dcd5ebcfefb9cfa10a 100644 --- a/R/plot.OutputsModel.R +++ b/R/plot.OutputsModel.R @@ -76,7 +76,7 @@ plot.OutputsModel <- function(x, Qobs = NULL, IndPeriod_Plot = NULL, BasinArea = ## check 'which' whichNeedQobs <- c("Error", "CorQQ") - whichDashboard <- c("all", "synth", "ts", "evap", "perf") + whichDashboard <- c("all", "synth", "ts", "perf") whichAll <- c("Precip", "PotEvap", "ActuEvap", "Temp", "SnowPack", "Flows", "Error", "Regime", "CumFreq", "CorQQ") whichSynth <- c("Precip" , "Temp", "SnowPack", "Flows" , "Regime", "CumFreq", "CorQQ") whichTS <- c("Precip", "PotEvap", "Temp", "SnowPack", "Flows" ) @@ -122,9 +122,6 @@ plot.OutputsModel <- function(x, Qobs = NULL, IndPeriod_Plot = NULL, BasinArea = if ("ts" %in% which) { which <- c(which, whichTS) } - if ("evap" %in% which) { - which <- c(which, whichEvap) - } if ("synth" %in% which) { which <- c(which, whichSynth) }