Skip to content
Snippets Groups Projects
Commit 9ec4cdc0 authored by Juliette Engelaere-Lefebvre's avatar Juliette Engelaere-Lefebvre
Browse files

fix typo dans annexes départementales au niveau des graphiques de dsitribution...

fix typo dans annexes départementales au niveau des graphiques de dsitribution des installations selon leur ration
parent 853d0d22
No related branches found
No related tags found
2 merge requests!25fix typo dans annexes départementales au niveau des graphiques de dsitribution...,!24Draft: redaction rapport NB
......@@ -298,7 +298,7 @@ cat(" ")
girafe(ggobj = creer_graph_age_installations_repondante(zone = ter[i])) # ajouter interactivité
cat(" ")
# à mettre en annexe après les graphes qui existent déjà sur les installations)
creer_graph_distrib_ration("44")
creer_graph_distrib_ration(ter[i])
cat(" ")
creer_camembert(dep = ter[i])
cat(" ")
......@@ -322,7 +322,7 @@ cat(" ")
creer_graph_age_installations_repondante(zone = ter[i]) # ajouter interactivité
cat(" ")
# à mettre en annexe après les graphes qui existent déjà sur les installations)
creer_graph_distrib_ration("44")
creer_graph_distrib_ration(ter[i])
cat(" ")
creer_camembert(dep = ter[i])
cat(" ")
......@@ -346,7 +346,7 @@ cat(" ")
creer_graph_age_installations_repondante(zone = ter[i]) # ajouter interactivité
cat(" ")
# à mettre en annexe après les graphes qui existent déjà sur les installations)
creer_graph_distrib_ration("44")
creer_graph_distrib_ration(ter[i])
cat(" ")
creer_camembert(dep = ter[i])
cat(" ")
......@@ -371,7 +371,7 @@ cat(" ")
creer_graph_age_installations_repondante(zone = ter[i]) # ajouter interactivité
cat(" ")
# à mettre en annexe après les graphes qui existent déjà sur les installations)
creer_graph_distrib_ration("44")
creer_graph_distrib_ration(ter[i])
cat(" ")
creer_camembert(dep = ter[i])
cat(" ")
......@@ -396,7 +396,7 @@ cat(" ")
creer_graph_age_installations_repondante(zone = ter[i]) # ajouter interactivité
cat(" ")
# à mettre en annexe après les graphes qui existent déjà sur les installations)
creer_graph_distrib_ration("44")
creer_graph_distrib_ration(ter[i])
cat(" ")
creer_camembert(dep = ter[i])
cat(" ")
......
# tout à la suite - HTML
rm(list = ls())
campagne <- "2022"
campagne <- "2023"
rmarkdown::render(input = "0_donnees_ref_palettes.Rmd",
output_file = paste0("compilation/", Sys.Date(), "-0_donnees_externes_", campagne, ".html"))
......@@ -14,8 +14,10 @@ rmarkdown::render(input = "2_redressement_reponses.Rmd",
rmarkdown::render(input = "4_intrants_valo.Rmd",
output_file = paste0("compilation/", Sys.Date(), "-4_intrants_valo_", campagne, ".html"))
rmarkdown::render(input = "5_Rapport.Rmd",
output_file = paste0("compilation/", Sys.Date(), "-5_rapport_", campagne, ".html"))
# rmarkdown::render(input = "5_Rapport.Rmd",
# output_file = paste0("compilation/", Sys.Date(), "-5_rapport_", campagne, ".html"))
bookdown::render_book(input = "5-rapport_bilans_annuels_metha/")
# Tout à la suite PDF
http_proxy <- Sys.getenv("http_proxy")
......@@ -24,7 +26,6 @@ Sys.unsetenv("https_proxy")
pagedown::chrome_print(input = paste0("compilation/", Sys.Date(), "-4_intrants_valo_", campagne, ".html"),
output = paste0("compilation/", Sys.Date(), "-4_intrants_valo_", campagne, ".pdf"))
pagedown::chrome_print(input = paste0("compilation/", Sys.Date(), "-5_rapport_", campagne, ".html"),
output = paste0("compilation/", Sys.Date(), "-5_rapport_", campagne, ".pdf"))
Sys.setenv(http_proxy = http_proxy)
Sys.setenv(https_proxy = http_proxy)
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment