lint files

TanguyBarthelemy · Apr 14, 2024 · d47f730 · d47f730
1 parent 23f665b
commit d47f730
Show file tree

Hide file tree

Showing 4 changed files with 32 additions and 32 deletions.
diff --git a/doc/EN/JDemetra+_configuration_guide_EN.Rmd b/doc/EN/JDemetra+_configuration_guide_EN.Rmd
@@ -40,23 +40,23 @@ color_format <- function(x, color, url = TRUE) {
     if (output_format == "latex") {
         x <- x |> gsub(pattern = "#", replacement = "\\#", fixed = TRUE)
         ret <- paste("\\textcolor{", color_name, ifelse(url, "}{\\url{", "}{\\nolinkurl{"), x, ifelse(url, "}}", "}}"), sep = "")
-        
-    # Génération de .html
+
+        # Génération de .html
     } else if (output_format == "html") {
         ret <- paste("<font color='", color, "'>", x, "</font>", sep = "")
-        
-    # Génération de .md pour Github
+
+        # Génération de .md pour Github
     } else if (output_format == "gfm+tex_math_dollars-yaml_metadata_block") {
         if (url) {
             ret <- paste("[", x, "](", x, ")", sep = "")
         } else {
-            ret <- x |> 
-                gsub(pattern = "\\", replacement = "\\\\", fixed = TRUE) |> 
+            ret <- x |>
+                gsub(pattern = "\\", replacement = "\\\\", fixed = TRUE) |>
                 gsub(pattern = "_", replacement = "\\\\_", fixed = TRUE)
             ret <- paste("${\\textsf{\\color{", color, "}{", ret, "}}}$", sep = "")
         }
-        
-    # Autres ?
+
+        # Autres ?
     } else {
         ret <- x
     }

diff --git a/doc/EN/JDemetra+_quick_installation_guide_EN.Rmd b/doc/EN/JDemetra+_quick_installation_guide_EN.Rmd
@@ -40,23 +40,23 @@ color_format <- function(x, color, url = TRUE) {
     if (output_format == "latex") {
         x <- x |> gsub(pattern = "#", replacement = "\\#", fixed = TRUE)
         ret <- paste("\\textcolor{", color_name, ifelse(url, "}{\\url{", "}{\\nolinkurl{"), x, ifelse(url, "}}", "}}"), sep = "")
-        
-    # Génération de .html
+
+        # Génération de .html
     } else if (output_format == "html") {
         ret <- paste("<font color='", color, "'>", x, "</font>", sep = "")
-        
-    # Génération de .md pour Github
+
+        # Génération de .md pour Github
     } else if (output_format == "gfm+tex_math_dollars-yaml_metadata_block") {
         if (url) {
             ret <- paste("[", x, "](", x, ")", sep = "")
         } else {
-            ret <- x |> 
-                gsub(pattern = "\\", replacement = "\\\\", fixed = TRUE) |> 
+            ret <- x |>
+                gsub(pattern = "\\", replacement = "\\\\", fixed = TRUE) |>
                 gsub(pattern = "_", replacement = "\\\\_", fixed = TRUE)
             ret <- paste("${\\textsf{\\color{", color, "}{", ret, "}}}$", sep = "")
         }
-        
-    # Autres ?
+
+        # Autres ?
     } else {
         ret <- x
     }

diff --git a/doc/FR/Guide_de_configuration_JDemetra+.Rmd b/doc/FR/Guide_de_configuration_JDemetra+.Rmd
@@ -41,23 +41,23 @@ color_format <- function(x, color, url = TRUE) {
     if (output_format == "latex") {
         x <- x |> gsub(pattern = "#", replacement = "\\#", fixed = TRUE)
         ret <- paste("\\textcolor{", color_name, ifelse(url, "}{\\url{", "}{\\nolinkurl{"), x, ifelse(url, "}}", "}}"), sep = "")
-        
-    # Génération de .html
+
+        # Génération de .html
     } else if (output_format == "html") {
         ret <- paste("<font color='", color, "'>", x, "</font>", sep = "")
-        
-    # Génération de .md pour Github
+
+        # Génération de .md pour Github
     } else if (output_format == "gfm+tex_math_dollars-yaml_metadata_block") {
         if (url) {
             ret <- paste("[", x, "](", x, ")", sep = "")
         } else {
-            ret <- x |> 
-                gsub(pattern = "\\", replacement = "\\\\", fixed = TRUE) |> 
+            ret <- x |>
+                gsub(pattern = "\\", replacement = "\\\\", fixed = TRUE) |>
                 gsub(pattern = "_", replacement = "\\\\_", fixed = TRUE)
             ret <- paste("${\\textsf{\\color{", color, "}{", ret, "}}}$", sep = "")
         }
-        
-    # Autres ?
+
+        # Autres ?
     } else {
         ret <- x
     }

diff --git a/doc/FR/Installation_rapide_JDemetra+.Rmd b/doc/FR/Installation_rapide_JDemetra+.Rmd
@@ -41,23 +41,23 @@ color_format <- function(x, color, url = TRUE) {
     if (output_format == "latex") {
         x <- x |> gsub(pattern = "#", replacement = "\\#", fixed = TRUE)
         ret <- paste("\\textcolor{", color_name, ifelse(url, "}{\\url{", "}{\\nolinkurl{"), x, ifelse(url, "}}", "}}"), sep = "")
-        
-    # Génération de .html
+
+        # Génération de .html
     } else if (output_format == "html") {
         ret <- paste("<font color='", color, "'>", x, "</font>", sep = "")
-        
-    # Génération de .md pour Github
+
+        # Génération de .md pour Github
     } else if (output_format == "gfm+tex_math_dollars-yaml_metadata_block") {
         if (url) {
             ret <- paste("[", x, "](", x, ")", sep = "")
         } else {
-            ret <- x |> 
-                gsub(pattern = "\\", replacement = "\\\\", fixed = TRUE) |> 
+            ret <- x |>
+                gsub(pattern = "\\", replacement = "\\\\", fixed = TRUE) |>
                 gsub(pattern = "_", replacement = "\\\\_", fixed = TRUE)
             ret <- paste("${\\textsf{\\color{", color, "}{", ret, "}}}$", sep = "")
         }
-        
-    # Autres ?
+
+        # Autres ?
     } else {
         ret <- x
     }