From 1be66b1db982887fada59aa621b0efa1218ed356 Mon Sep 17 00:00:00 2001
From: Delaigue Olivier <olivier.delaigue@irstea.priv>
Date: Thu, 21 Feb 2019 15:39:05 +0100
Subject: [PATCH] v1.1.3.8 UPDATE: ErrorCrit doc example with new varObs names
 for discharge in CreateInputsCrit fun

---
 DESCRIPTION      | 2 +-
 NEWS.rmd         | 2 +-
 man/ErrorCrit.Rd | 6 +++---
 3 files changed, 5 insertions(+), 5 deletions(-)

diff --git a/DESCRIPTION b/DESCRIPTION
index 46184d2f..6dec702c 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.1.3.7
+Version: 1.1.3.8
 Date: 2019-02-21
 Authors@R: c(
   person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")),
diff --git a/NEWS.rmd b/NEWS.rmd
index bfd4e7ca..79d50a96 100644
--- a/NEWS.rmd
+++ b/NEWS.rmd
@@ -13,7 +13,7 @@ output:
 
 
 
-### 1.1.3.7 Release Notes (2019-02-21)
+### 1.1.3.8 Release Notes (2019-02-21)
 
 
 
diff --git a/man/ErrorCrit.Rd b/man/ErrorCrit.Rd
index 26c7bb3f..b856d496 100644
--- a/man/ErrorCrit.Rd
+++ b/man/ErrorCrit.Rd
@@ -82,7 +82,7 @@ OutputsModel <- RunModel_GR4J(InputsModel = InputsModel, RunOptions = RunOptions
 InputsCritSingle <- CreateInputsCrit(FUN_CRIT = ErrorCrit_NSE,
                                      InputsModel = InputsModel, RunOptions = RunOptions,
                                      obs = list(BasinObs$Qmm[Ind_Run]),
-                                     varObs = "Qobs", transfo = "",
+                                     varObs = "Q", transfo = "",
                                      weight = NULL) 
 str(ErrorCrit(InputsCrit = InputsCritSingle, OutputsModel = OutputsModel))
 
@@ -90,7 +90,7 @@ str(ErrorCrit(InputsCrit = InputsCritSingle, OutputsModel = OutputsModel))
 InputsCritMulti <- CreateInputsCrit(FUN_CRIT = list(ErrorCrit_RMSE, ErrorCrit_NSE),
                                     InputsModel = InputsModel, RunOptions = RunOptions,
                                     obs = list(BasinObs$Qmm[Ind_Run], BasinObs$Qmm[Ind_Run]),
-                                    varObs = list("Qobs", "Qobs"), transfo = list("", "sqrt"),
+                                    varObs = list("Q", "Q"), transfo = list("", "sqrt"),
                                     weight = NULL) 
 str(ErrorCrit(InputsCrit = InputsCritMulti, OutputsModel = OutputsModel))
 
@@ -99,7 +99,7 @@ str(ErrorCrit(InputsCrit = InputsCritMulti, OutputsModel = OutputsModel))
 InputsCritCompo <- CreateInputsCrit(FUN_CRIT = list(ErrorCrit_NSE, ErrorCrit_NSE),
                                     InputsModel = InputsModel, RunOptions = RunOptions,
                                     obs = list(BasinObs$Qmm[Ind_Run], BasinObs$Qmm[Ind_Run]),
-                                    varObs = list("Qobs", "Qobs"), transfo = list("", "log"),
+                                    varObs = list("Q", "Q"), transfo = list("", "log"),
                                     weight = list(0.4, 0.6)) 
 str(ErrorCrit(InputsCrit = InputsCritCompo, OutputsModel = OutputsModel))
 }
-- 
GitLab