diff --git a/DESCRIPTION b/DESCRIPTION index 8b8c2a8fb0670ff816023a05b4c0431cef3efeb4..0af67793dd44e3a957adf3deeaf7544f30b96bf1 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.2.12.29 +Version: 1.2.12.30 Date: 2019-04-01 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 d5d3bc997339807c171162c6c208183c109d0b08..ce2c00437fdc720a8f5ca686aedc964fb09c0ada 100644 --- a/NEWS.rmd +++ b/NEWS.rmd @@ -13,7 +13,7 @@ output: -### 1.2.12.28 Release Notes (2019-04-01) +### 1.2.12.30 Release Notes (2019-04-01) diff --git a/R/ErrorCrit.R b/R/ErrorCrit.R index e4ae8c26c69c5d82a7901f9b1b5b32141c1171d8..53f6511958f8a1c82ece70bd38730ee1bdb44023 100644 --- a/R/ErrorCrit.R +++ b/R/ErrorCrit.R @@ -38,7 +38,7 @@ ErrorCrit <- function(InputsCrit, OutputsModel, FUN_CRIT, warnings = TRUE, verbo listValCrit <- sapply(listOutputsCrit, function(x) x[["CritValue"]]) listNameCrit <- sapply(listOutputsCrit, function(x) x[["CritName"]]) - listweights <- unlist(lapply(InputsCrit, function(x) x[["weights"]])) + listweights <- unlist(lapply(InputsCrit, function(x) x[["Weights"]])) listweights <- listweights / sum(listweights) if (inherits(InputsCrit, "Compo")) {