From bd218ebca44de56ac0ade957e9cc3fc751a5ceda Mon Sep 17 00:00:00 2001 From: Delaigue Olivier <olivier.delaigue@irstea.fr> Date: Fri, 6 Nov 2020 16:04:31 +0100 Subject: [PATCH] v1.6.3.34 docs(man): break to long code line in the Runmodel_Lag example in order to avoid NOTE during CRAN check --- DESCRIPTION | 2 +- NEWS.md | 2 +- man/RunModel_LAG.Rd | 4 +++- 3 files changed, 5 insertions(+), 3 deletions(-) diff --git a/DESCRIPTION b/DESCRIPTION index b862039c..e4e61e9a 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.6.3.33 +Version: 1.6.3.34 Date: 2020-11-06 Authors@R: c( person("Laurent", "Coron", role = c("aut", "trl"), comment = c(ORCID = "0000-0002-1503-6204")), diff --git a/NEWS.md b/NEWS.md index 176770a7..e0e3127c 100644 --- a/NEWS.md +++ b/NEWS.md @@ -4,7 +4,7 @@ -### 1.6.3.33 Release Notes (2020-11-06) +### 1.6.3.34 Release Notes (2020-11-06) #### New features diff --git a/man/RunModel_LAG.Rd b/man/RunModel_LAG.Rd index c601dc08..1bbd897d 100644 --- a/man/RunModel_LAG.Rd +++ b/man/RunModel_LAG.Rd @@ -45,7 +45,9 @@ data(L0123001) ## Simulating a reservoir # Withdrawing 1 m3/s with an instream flow of 1 m3/s -Qupstream <- matrix(- unlist(lapply(BasinObs$Qls / 1000 - 1, function(x) {min(1, max(0,x, na.rm = TRUE))})), ncol = 1) +Qupstream <- matrix(- unlist(lapply(BasinObs$Qls / 1000 - 1, function(x) { + min(1, max(0,x, na.rm = TRUE)) +})), ncol = 1) # Except between July and November when releasing 3 m3/s month <- as.numeric(format(BasinObs$DatesR,"\%m")) Qupstream[month >= 7 & month <= 9] <- 3 -- GitLab