From aa4e6b2d42a28d0d32fb7471438f93e06c6630dd Mon Sep 17 00:00:00 2001
From: Dorchies David <david.dorchies@inrae.fr>
Date: Wed, 30 Jun 2021 16:42:23 +0200
Subject: [PATCH] fix(RunModel_lag): remove extra "names" attribute on
OutputsModel$Qsim
Refs #131, in-wop/airGRiwrm#50
---
R/RunModel_Lag.R | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/R/RunModel_Lag.R b/R/RunModel_Lag.R
index 622139ad..be71d890 100644
--- a/R/RunModel_Lag.R
+++ b/R/RunModel_Lag.R
@@ -81,7 +81,7 @@ RunModel_Lag <- function(InputsModel, RunOptions, Param, QcontribDown) {
# If warm-up period is not enough long complete beginning with first value
ini <- c(rep(ini[1], floor(PT[iUpBasins] + 1) - length(ini)), ini)
}
- return(ini)
+ return(as.vector(ini))
}
)
}
--
GitLab