Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
HYCAR-Hydro
airGR
Commits
a87c8d7d
Commit
a87c8d7d
authored
Apr 05, 2017
by
unknown
Browse files
v1.0.6.2 the print of the KGE2 gamma is fixed #4665
parent
e42dfeed
Changes
2
Hide whitespace changes
Inline
Side-by-side
DESCRIPTION
View file @
a87c8d7d
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")),
...
...
R/ErrorCrit_KGE2.R
View file @
a87c8d7d
...
...
@@ -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
;
}
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment