rajout d un zero au paste

data-raw/07_chargement_ecln.R

@@ -24,7 +24,7 @@ tab_valeurs <- tab_ecln %>%
   select(TypeZone,Zone,CodeZone,date=Periode,variable=Indicateur, valeur=Valeur)
 tab_evol <- tab_ecln %>%
   select(TypeZone,Zone,CodeZone,date=Periode,variable=Indicateur, valeur=TauxEvolution12Mois) %>%
-  mutate(variable = paste("evol12m_",variable))
+  mutate(variable = paste0("evol12m_",variable))
 source_ecln <- bind_rows(tab_valeurs,tab_evol) %>%
   mutate(valeur = format(valeur, scientific = FALSE)) %>%
   pivot_wider(names_from = variable,values_from = valeur)