Commit 9c9f23fb authored by Delaigue Olivier's avatar Delaigue Olivier
Browse files

v1.2.16.27 DOC: example of plot.Outputsmodel updated with new dataset names

Showing with 18 additions and 15 deletions
+18 -15
Package: airGR
Type: Package
Title: Suite of GR Hydrological Models for Precipitation-Runoff Modelling
Version: 1.2.16.26
Version: 1.2.16.27
Date: 2019-06-07
Authors@R: c(
person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")),
......
......@@ -14,7 +14,7 @@ output:
### 1.2.16.26 Release Notes (2019-06-07)
### 1.2.16.27 Release Notes (2019-06-07)
#### New features
......
......@@ -4,6 +4,9 @@
\name{plot.OutputsModel}
\alias{plot.OutputsModel}
\alias{plot}
\alias{exampleSimPlot}
\alias{simGR4J}
\alias{simCNGR4J}
\title{Default preview of model outputs}
......@@ -98,34 +101,34 @@ Laurent Coron, Olivier Delaigue, Guillaume Thirel
## loading examples dataset for GR4J and GR4J + CemaNeige
data(plotOutputsModel)
data(exampleSimPlot)
### Qobs and outputs from GR4J and GR4J + CemaNeige models
str(GR4J, max.level = 1)
str(CNGR4J, max.level = 1)
str(simGR4J, max.level = 1)
str(simCNGR4J, max.level = 1)
### default dashboard (which = "synth")
## GR models whithout CemaNeige
plot(GR4J$OutputsModel, Qobs = GR4J$Qobs)
plot(simGR4J$OutputsModel, Qobs = simGR4J$Qobs)
## GR models whith CemaNeige ("Temp" and "SnowPack" added)
plot(CNGR4J$OutputsModel, Qobs = CNGR4J$Qobs)
plot(simCNGR4J$OutputsModel, Qobs = simCNGR4J$Qobs)
### "Error" and "CorQQ" plots cannot be display whithout Qobs
plot(GR4J$OutputsModel, which = "all", Qobs = GR4J$Qobs)
plot(GR4J$OutputsModel, which = "all", Qobs = NULL)
plot(simGR4J$OutputsModel, which = "all", Qobs = simGR4J$Qobs)
plot(simGR4J$OutputsModel, which = "all", Qobs = NULL)
### complex plot arrangements
plot(GR4J$OutputsModel, Qobs = GR4J$Qobs,
which = c("Flows", "Regime", "CumFreq", "CorQQ"),
LayoutMat = matrix(c(1, 2, 3, 1, 4, 4), ncol = 2),
LayoutWidths = c(1.5, 1),
LayoutHeights = c(0.5, 1, 1))
plot(simGR4J$OutputsModel, Qobs = simGR4J$Qobs,
which = c("Flows", "Regime", "CumFreq", "CorQQ"),
LayoutMat = matrix(c(1, 2, 3, 1, 4, 4), ncol = 2),
LayoutWidths = c(1.5, 1),
LayoutHeights = c(0.5, 1, 1))
### add a main title
......@@ -135,7 +138,7 @@ opar <- par(no.readonly = TRUE)
## define outer margins and a title inside it
par(oma = c(0, 0, 3, 0))
plot(GR4J$OutputsModel, Qobs = GR4J$Qobs)
plot(simGR4J$OutputsModel, Qobs = simGR4J$Qobs)
title(main = "GR4J outputs", outer = TRUE, line = 1.2, cex.main = 1.4)
## reset original par
......
Supports Markdown
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