Commit 2ed184b0 authored by Delaigue Olivier's avatar Delaigue Olivier
Browse files

v0.2.6.11 CLEAN: unused box removed in plot.CalGR

parent 416ea64e
Package: airGRteaching
Type: Package
Title: Teaching Hydrological Modelling with the GR Rainfall-Runoff Models ('Shiny' Interface Included)
Version: 0.2.6.10
Version: 0.2.6.11
Date: 2019-04-02
Authors@R: c(
person("Olivier", "Delaigue", role = c("aut", "cre"), comment = c(ORCID = "0000-0002-7668-8468"), email = "airGR@irstea.fr"),
......
......@@ -13,7 +13,7 @@ output:
### 0.2.6.10 Release Notes (2019-04-02)
### 0.2.6.11 Release Notes (2019-04-02)
#### CRAN-compatibility updates
......
......@@ -16,7 +16,7 @@ plot.CalGR <- function(x, xlab = NULL, ylab = NULL, main = NULL, which = c("per
on.exit(par(opar))
if (any(which[1L] %in% c("perf"))) {
plot(x$OutputsModel, Qobs = x$Qobs, ...)
plot.OutputsModel(x$OutputsModel, Qobs = x$Qobs, ...)
}
if (any(which[1L] %in% c("iter"))) {
......@@ -42,7 +42,6 @@ plot.CalGR <- function(x, xlab = NULL, ylab = NULL, main = NULL, which = c("per
}
if (any(which[1L] %in% c("iter"))) {
ParamLab <- data.frame(Name = c(sprintf("X%i", 1:6), sprintf("C%i", 1:2)),
Label = c("prod. store capacity [mm]",
"intercatchment exch. coef. [mm/TimeUnit]",
......@@ -106,6 +105,6 @@ plot.CalGR <- function(x, xlab = NULL, ylab = NULL, main = NULL, which = c("per
# legend("topright", legend = "NA", pch = 15, col = col.na, bty = "n", cex = 0.8)
# }
}
box()
# box()
}
\ No newline at end of file
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