Do some cleaning in POST_FATE.[...] functions

Author: MayaGueguen

R/POST_FATE.graphic_evolutionCoverage.R

@@ -242,13 +242,13 @@ POST_FATE.graphic_evolutionCoverage = function(
                    , " > POST_FATE_TABLE_ZONE_evolution_totalAbundance_"
                    , basename(GLOB_DIR$dir.save)
                    , ".csv \n"
-                   , "have been successfully created !\n"))
+                   , "have been successfully created !"))
 
 
     ## produce the plot -------------------------------------------------------
     if (opt.doPlot)
     {
-      cat("\n ---------- PRODUCING PLOTS \n")
+      cat("\n ---------- PRODUCING PLOTS")
       col_vec = c("#1B9E77", "#D95F02", "#7570B3", "#E7298A", "#66A61E", "#E6AB02", "#A6761D", "#666666")
       col_fun = colorRampPalette(col_vec)
       list.pp1 = list.pp2 = list()

R/POST_FATE.graphic_evolutionPixels.R

@@ -261,12 +261,12 @@ POST_FATE.graphic_evolutionPixels = function(
                    , "_"
                    , basename(GLOB_DIR$dir.save)
                    , ".csv \n"
-                   , "has been successfully created !\n"))
+                   , "has been successfully created !"))
 
     ## produce the plot -------------------------------------------------------
     if (opt.doPlot)
     {
-      cat("\n ---------- PRODUCING PLOT \n")
+      cat("\n ---------- PRODUCING PLOT")
       vec_col1 = c('#a6cee3','#1f78b4','#b2df8a','#33a02c','#fb9a99','#e31a1c','#fdbf6f','#ff7f00','#cab2d6')
       val_col1 = c(rep(rgb(1,1,1,1), GLOB_SIM$no_STRATA)
                    , colorRampPalette(vec_col1)(GLOB_SIM$no_PFG)

R/POST_FATE.graphic_evolutionStability.R

@@ -390,15 +390,15 @@ POST_FATE.graphic_evolutionStability = function(
                      , " > POST_FATE_TABLE_HAB_evolution_stability2_"
                      , basename(GLOB_DIR$dir.save)
                      , ".csv \n"
-                     , "has been successfully created !\n"))
+                     , "has been successfully created !"))
 
       ## Compare quantiles ----------------------------------------------------
       ## TO BE DONE ??
 
       ## produce the plot -----------------------------------------------------
       if (opt.doPlot && !is.null(tab.HAB))
       {
-        cat("\n ---------- PRODUCING PLOT \n")
+        cat("\n ---------- PRODUCING PLOT")
         col_vec = c("#1B9E77", "#D95F02", "#7570B3", "#E7298A", "#66A61E", "#E6AB02", "#A6761D", "#666666")
         col_fun = colorRampPalette(col_vec)