diff --git a/DESCRIPTION b/DESCRIPTION
index e90d903ede00b9c9eafc3e57434a058c49c0b349..e1705ce736bbd2da7c29b2a5f691940fb29f9b0c 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.13.7
+Version: 1.2.13.8
 Date: 2019-04-02
 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 192daf981c1ac33017a768c09d974869f2b8255f..5ca0fedef78f7783d3363f4d0ab8caef0810868d 100644
--- a/NEWS.rmd
+++ b/NEWS.rmd
@@ -13,7 +13,7 @@ output:
 
 
 
-### 1.2.13.7 Release Notes (2019-04-02)
+### 1.2.13.8 Release Notes (2019-04-02)
 
 
 
diff --git a/vignettes/V02.1_param_optim.Rmd b/vignettes/V02.1_param_optim.Rmd
index 272420b7af4f62075cafa787c4cb7312bf3bfb6a..d750f77e7b1cadd254b057213f5b84ec7f5b4001 100644
--- a/vignettes/V02.1_param_optim.Rmd
+++ b/vignettes/V02.1_param_optim.Rmd
@@ -108,7 +108,7 @@ We can then extract the best parameter sets and the value of the performance cri
 ```{r, warning=FALSE, results='hide', eval=FALSE}
 parPORT <- t(sapply(listOptPORT, function(x) x$par))
 objPORT <- sapply(listOptPORT, function(x) x$objective)
-parPORT  <- data.frame(parPORT, RMSE = objPORT)
+parPORT <- data.frame(parPORT, RMSE = objPORT)
 ```
 
 As can be seen below, the optimum performance criterion values (column *objective*) can differ from the global optimum value in many cases, resulting in various parameter sets.