v1.0.9.11 bug fixed in y-axis labelling of plot.OutputsMode when argument BasinArea is used #4660

ca94147d · unknown · 854d1b97 · ca94147d · ca94147d
Commit ca94147d authored 7 years ago by unknown
Hide whitespace changes
Inline Side-by-side

Showing

with 2 additions and 2 deletions
+2 -2
--- a/DESCRIPTION
+++ b/DESCRIPTION
 Package: airGR
 Type: Package
 Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
-Version: 1.0.9.10
+Version: 1.0.9.11
 Date: 2017-07-11
 Authors@R: c(
  person("Laurent", "Coron", role = c("aut", "trl")),

--- a/R/plot.OutputsModel.R
+++ b/R/plot.OutputsModel.R
@@ -415,7 +415,7 @@ plot.OutputsModel <- function(x, Qobs = NULL, IndPeriod_Plot = NULL, BasinArea =
    if (BOOL_Pobs) { posleg <- "right"; txtlab <- "precip. & flow regime"; }
    par(las = 0); mtext(side = 2, paste0(txtlab, " ", plotunitregime), line = line, cex = cex.lab); par(las = 0);
    if (!is.null(BasinArea)) {
-      Factor <- Factor_MMM_M3S;
+      Factor <- Factor_UNIT_M3S;
      axis(side = 4, at = pretty(ylimQ*Factor)/Factor, labels = pretty(ylimQ*Factor), cex.axis = cex.axis, ...);
      par(las = 0); mtext(side = 4, paste0("flow ", "m3/s"), line = line, cex = cex.lab); par(las = 0); }
    ### posleg <- "topright"; if (BOOL_Pobs) { posleg <- "right"; }