From 69a7134622709f759a1fa796fc8115716eee4806 Mon Sep 17 00:00:00 2001
From: Delaigue Olivier <olivier.delaigue@irstea.fr>
Date: Thu, 4 Feb 2021 17:36:43 +0100
Subject: [PATCH] docs(vignette): indent code and change number of digits in
summary
---
vignettes/V01_get_started.Rmd | 2 +-
vignettes/V05_sd_model.Rmd | 10 +++++-----
2 files changed, 6 insertions(+), 6 deletions(-)
diff --git a/vignettes/V01_get_started.Rmd b/vignettes/V01_get_started.Rmd
index 3c5eb159..6ffdbfc4 100644
--- a/vignettes/V01_get_started.Rmd
+++ b/vignettes/V01_get_started.Rmd
@@ -63,7 +63,7 @@ Below is presented an example of a `data.frame` of daily hydrometeorological obs
```{r}
data(L0123001)
-summary(BasinObs)
+summary(BasinObs, digits = 2)
```
The usual functions (e.g. `read.table()`) can be used to load real-case data sets.
diff --git a/vignettes/V05_sd_model.Rmd b/vignettes/V05_sd_model.Rmd
index f970f603..383d8a93 100644
--- a/vignettes/V05_sd_model.Rmd
+++ b/vignettes/V05_sd_model.Rmd
@@ -69,8 +69,8 @@ InputsModelUp <- CreateInputsModel(FUN_MOD = RunModel_GR4J, DatesR = BasinObs$Da
Ind_Run <- seq(which(format(BasinObs$DatesR, format = "%Y-%m-%d") == "1990-01-01"),
which(format(BasinObs$DatesR, format = "%Y-%m-%d") == "1999-12-31"))
RunOptionsUp <- CreateRunOptions(FUN_MOD = RunModel_GR4J,
- InputsModel = InputsModelUp
- , IndPeriod_WarmUp = NULL, IndPeriod_Run = Ind_Run,
+ InputsModel = InputsModelUp,
+ IndPeriod_WarmUp = NULL, IndPeriod_Run = Ind_Run,
IniStates = NULL, IniResLevels = NULL)
InputsCritUp <- CreateInputsCrit(FUN_CRIT = ErrorCrit_NSE, InputsModel = InputsModelUp,
RunOptions = RunOptionsUp,
@@ -198,9 +198,9 @@ Theoretically, the parameters of the downstream GR4J model should be the same as
```{r}
ParamDownTheo <- c(Lag, OutputsCalibUp$ParamFinalR)
OutputsModelDownTheo <- RunModel(InputsModel = InputsModelDown2,
- RunOptions = RunOptionsDown,
- Param = ParamDownTheo,
- FUN_MOD = RunModel_GR4J)
+ RunOptions = RunOptionsDown,
+ Param = ParamDownTheo,
+ FUN_MOD = RunModel_GR4J)
CritDownTheo <- ErrorCrit_NSE(InputsCritDown, OutputsModelDownTheo)
```
--
GitLab