v1.0.6.2 the print of the KGE2 gamma is fixed #4665

a87c8d7d · unknown · e42dfeed · a87c8d7d · a87c8d7d
Commit a87c8d7d authored 8 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.6.1
+Version: 1.0.6.2
 Date: 2017-04-05
 Authors@R: c(
  person("Laurent", "Coron", role = c("aut", "trl")),

--- a/R/ErrorCrit_KGE2.R
+++ b/R/ErrorCrit_KGE2.R
@@ -67,7 +67,7 @@ ErrorCrit_KGE2 <- function(InputsCrit,OutputsModel, warnings = TRUE, verbose = T
 ##SubErrorCrit_____KGE_gama______________________
  iCrit <- iCrit+1;
-  SubCritNames[iCrit]  <-  paste(CritName," sd(sim)/sd(obs)          =", sep = "")
+  SubCritNames[iCrit]  <-  paste(CritName," cv(sim)/cv(obs)          =", sep = "")
  SubCritValues[iCrit] <- NA;
  if(meanVarSim==0){ if(sd(VarSim[!TS_ignore])==0){ CVsim <- 1; } else { CVsim <- 99999; } } else { CVsim <- sd(VarSim[!TS_ignore])/meanVarSim; }
  if(meanVarObs==0){ if(sd(VarObs[!TS_ignore])==0){ CVobs <- 1; } else { CVobs <- 99999; } } else { CVobs <- sd(VarObs[!TS_ignore])/meanVarObs; }