Resolve "`plot.GRiwrm`: mermaid code is displayed with the diagram"

Closes #73 (closed)

R/plot.GRiwrm.R

@@ -27,7 +27,7 @@ plot.GRiwrm <- function(x, display = TRUE, orientation = "LR", width = "100%", h
   nodes <- paste(
     g2$id,
     "-->|",
-    format(g2$length, trim = TRUE, digits = 0),
+    round(g2$length, digits = 0),
     "km|",
     g2$down
   )

vignettes/V01_Structure_SD_model.Rmd

 ---
 title: 'Severn_01: Set up of a semi-distributed GR model network'
 author: "David Dorchies"
+output: rmarkdown::html_vignette
 vignette: >
   %\VignetteIndexEntry{Severn_01: Set up of a semi-distributed GR model network}
   %\VignetteEngine{knitr::rmarkdown}
@@ -75,8 +76,7 @@ griwrm
 The diagram of the network structure is represented below with in blue the upstream nodes with a GR4J model and in green the intermediate nodes with an SD (GR4J + LAG) model.
 
 ```{r diagram}
-mermaid_code <- plot(griwrm, display = FALSE)
-DiagrammeR::mermaid(mermaid_code)
+plot(griwrm)
 ```
 
 

vignettes/V02_Calibration_SD_model.Rmd

 ---
 title: "Severn_02: Calibration of a GR4J semi-distributed model network"
 author: "David Dorchies"
+output: rmarkdown::html_vignette
 vignette: >
   %\VignetteIndexEntry{Severn_02: Calibration of a GR4J semi-distributed model network}
   %\VignetteEngine{knitr::rmarkdown}

vignettes/V03_Open-loop_influenced_flow.Rmd

 ---
 title: "Severn_03: Calibration of an open-loop influenced flow model network"
 author: "David Dorchies"
+output: rmarkdown::html_vignette
 vignette: >
   %\VignetteIndexEntry{Severn_03: Calibration of an open-loop influenced flow model network}
   %\VignetteEngine{knitr::rmarkdown}