Skip to content
Snippets Groups Projects
Commit fba535b8 authored by lisasmah's avatar lisasmah
Browse files

#14 préparation des données necessaires pour la cartes

parent ae7533a4
No related branches found
No related tags found
No related merge requests found
Pipeline #533020 passed
Stage: build
Hide whitespace changes
Inline Side-by-side
05-climat.Rmd
+ 40
− 1
View file @ fba535b8
...@@ -16,17 +16,56 @@ Carte à reproduire : ...@@ -16,17 +16,56 @@ Carte à reproduire :
knitr::include_graphics("https://www.pays-de-la-loire.developpement-durable.gouv.fr/IMG/png/carte_08a_reduire_les_emissions_de_ges_par_secteur.png") knitr::include_graphics("https://www.pays-de-la-loire.developpement-durable.gouv.fr/IMG/png/carte_08a_reduire_les_emissions_de_ges_par_secteur.png")
``` ```
```{r chargement des library}
library(sf)
library(ggplot2)
library(dplyr)
library(readr)
```
```{r Charger les données}
epci_emissions_de_gaz_a_effet_de_serre <- read_delim("T:/datalab/SCTE/SCTE_CARTES_ENJEUX/DONNEES_CLIENT/Carte 8 - Réduire les émissions de GES/epci_emissions-de-gaz-a-effet-de-serre.csv",
delim = ";", escape_double = FALSE, trim_ws = TRUE)
# "delim = ";" ": le séparateur est ";"
# "escape_double = FALSE ": Les guillemets doubles ne sont pas traités comme des caractères spéciaux. Cela signifie que s'il y a des guillemets dans les données, ils sont lus tels quels.
# "trim_ws = TRUE": Supprime les espaces blancs au début et à la fin des valeurs dans chaque colonne.
```
```{r Nettoyage des données}
# Nettoyer les valeurs en remplaçant les virgules par des points dans la colonne "valeur_kteqCO2"
epci_emissions_de_gaz_a_effet_de_serre <- epci_emissions_de_gaz_a_effet_de_serre %>%
mutate(valeur_kteqCO2 = gsub(",", ".", valeur_kteqCO2)) # Remplacer les virgules par des points
# Convertir la colonne en numérique
epci_emissions_de_gaz_a_effet_de_serre <- epci_emissions_de_gaz_a_effet_de_serre %>%
mutate(valeur_kteqCO2 = as.numeric(valeur_kteqCO2)) # Convertir en numérique
```
```{r } ```{r Calcul des pourcentages EPCI}
epci_emissions_de_gaz_a_effet_de_serre<-epci_emissions_de_gaz_a_effet_de_serre %>%
group_by(nom) %>%
mutate(total_emissions = sum(valeur_kteqCO2)) %>%
mutate(percentage_par_secteur_et_energie = valeur_kteqCO2 / total_emissions * 100)
pourcentage_par_secteur <- epci_emissions_de_gaz_a_effet_de_serre %>%
group_by(nom, code_epci, secteur) %>%
summarise(pourcentage_pr_secteur = sum(percentage_par_secteur_et_energie, na.rm = TRUE))
``` ```
```{r Calcul des pourcentages régionale}
pourcentage_région_emissions_de_ges_par_secteur <- epci_emissions_de_gaz_a_effet_de_serre %>%
group_by(secteur) %>%
summarise(total_emissions_region_pr_secteur = sum(valeur_kteqCO2, na.rm = TRUE)) %>%
mutate(pourcentage_region_pr_secteur = total_emissions_region_pr_secteur / sum(total_emissions_region_pr_secteur) * 100)
# Vérification du résultat
head(pourcentage_région_emissions_de_ges_par_secteur)
```
### Carte_09a_Consommation couverte par la production d'EnR.pdf ### Carte_09a_Consommation couverte par la production d'EnR.pdf
......
_book/404.html
+ 40
− 40
View file @ fba535b8
...@@ -23,7 +23,7 @@ ...@@ -23,7 +23,7 @@
<meta name="author" content="DREAL PDL/SCTE/CSD" /> <meta name="author" content="DREAL PDL/SCTE/CSD" />
<meta name="date" content="2025-01-27" /> <meta name="date" content="2025-03-07" />
<meta name="viewport" content="width=device-width, initial-scale=1" /> <meta name="viewport" content="width=device-width, initial-scale=1" />
<meta name="apple-mobile-web-app-capable" content="yes" /> <meta name="apple-mobile-web-app-capable" content="yes" />
...@@ -49,9 +49,9 @@ ...@@ -49,9 +49,9 @@
<link href="libs/Marianne-1.0/stylesheet.css" rel="stylesheet" /> <link href="libs/Marianne-0.999/stylesheet.css" rel="stylesheet" />
<link href="libs/Spectral-2.003/stylesheet.css" rel="stylesheet" /> <link href="https://fonts.googleapis.com/css2?family=Spectral:ital,wght@0,200;0,300;0,400;0,500;0,600;0,700;0,800;1,200;1,300;1,400;1,500;1,600;1,700;1,800&display=swap" rel="stylesheet" />
<link href="libs/SpectralSC-2.003/stylesheet.css" rel="stylesheet" /> <link href="https://fonts.googleapis.com/css2?family=Spectral+SC:ital,wght@0,200;0,300;0,400;0,500;0,600;0,700;0,800;1,200;1,300;1,400;1,500;1,600;1,700;1,800&display=swap" rel="stylesheet" />
<link href="libs/gouvdown-default-0.0.0.9001/default.css" rel="stylesheet" /> <link href="libs/gouvdown-default-0.0.0.9001/default.css" rel="stylesheet" />
<link href="libs/anchor-sections-1.1.0/anchor-sections.css" rel="stylesheet" /> <link href="libs/anchor-sections-1.1.0/anchor-sections.css" rel="stylesheet" />
<link href="libs/anchor-sections-1.1.0/anchor-sections-hash.css" rel="stylesheet" /> <link href="libs/anchor-sections-1.1.0/anchor-sections-hash.css" rel="stylesheet" />
...@@ -243,42 +243,42 @@ the table of contents to find the page you are looking for.</p> ...@@ -243,42 +243,42 @@ the table of contents to find the page you are looking for.</p>
<script> <script>
gitbook.require(["gitbook"], function(gitbook) { gitbook.require(["gitbook"], function(gitbook) {
gitbook.start({ gitbook.start({
"sharing": { "sharing": {
"github": false, "github": false,
"facebook": true, "facebook": true,
"twitter": true, "twitter": true,
"linkedin": false, "linkedin": false,
"weibo": false, "weibo": false,
"instapaper": false, "instapaper": false,
"vk": false, "vk": false,
"whatsapp": false, "whatsapp": false,
"all": ["facebook", "twitter", "linkedin", "weibo", "instapaper"] "all": ["facebook", "twitter", "linkedin", "weibo", "instapaper"]
}, },
"fontsettings": { "fontsettings": {
"theme": "white", "theme": "white",
"family": "sans", "family": "sans",
"size": 2 "size": 2
}, },
"edit": { "edit": {
"link": null, "link": null,
"text": null "text": null
}, },
"history": { "history": {
"link": null, "link": null,
"text": null "text": null
}, },
"view": { "view": {
"link": null, "link": null,
"text": null "text": null
}, },
"download": ["cartes_enjeux_pdl.pdf"], "download": ["cartes_enjeux_pdl.pdf"],
"search": { "search": {
"engine": "fuse", "engine": "fuse",
"options": null "options": null
}, },
"toc": { "toc": {
"collapse": "subsection" "collapse": "subsection"
} }
}); });
}); });
</script> </script>
......
_book/climat.html
+ 45
− 42
View file @ fba535b8
...@@ -23,7 +23,7 @@ ...@@ -23,7 +23,7 @@
<meta name="author" content="DREAL PDL/SCTE/CSD" /> <meta name="author" content="DREAL PDL/SCTE/CSD" />
<meta name="date" content="2025-01-27" /> <meta name="date" content="2025-03-07" />
<meta name="viewport" content="width=device-width, initial-scale=1" /> <meta name="viewport" content="width=device-width, initial-scale=1" />
<meta name="apple-mobile-web-app-capable" content="yes" /> <meta name="apple-mobile-web-app-capable" content="yes" />
...@@ -49,9 +49,9 @@ ...@@ -49,9 +49,9 @@
<link href="libs/Marianne-1.0/stylesheet.css" rel="stylesheet" /> <link href="libs/Marianne-0.999/stylesheet.css" rel="stylesheet" />
<link href="libs/Spectral-2.003/stylesheet.css" rel="stylesheet" /> <link href="https://fonts.googleapis.com/css2?family=Spectral:ital,wght@0,200;0,300;0,400;0,500;0,600;0,700;0,800;1,200;1,300;1,400;1,500;1,600;1,700;1,800&display=swap" rel="stylesheet" />
<link href="libs/SpectralSC-2.003/stylesheet.css" rel="stylesheet" /> <link href="https://fonts.googleapis.com/css2?family=Spectral+SC:ital,wght@0,200;0,300;0,400;0,500;0,600;0,700;0,800;1,200;1,300;1,400;1,500;1,600;1,700;1,800&display=swap" rel="stylesheet" />
<link href="libs/gouvdown-default-0.0.0.9001/default.css" rel="stylesheet" /> <link href="libs/gouvdown-default-0.0.0.9001/default.css" rel="stylesheet" />
<link href="libs/anchor-sections-1.1.0/anchor-sections.css" rel="stylesheet" /> <link href="libs/anchor-sections-1.1.0/anchor-sections.css" rel="stylesheet" />
<link href="libs/anchor-sections-1.1.0/anchor-sections-hash.css" rel="stylesheet" /> <link href="libs/anchor-sections-1.1.0/anchor-sections-hash.css" rel="stylesheet" />
...@@ -221,10 +221,13 @@ code span.wa { color: #60a0b0; font-weight: bold; font-style: italic; } /* Warni ...@@ -221,10 +221,13 @@ code span.wa { color: #60a0b0; font-weight: bold; font-style: italic; } /* Warni
<h1><span class="header-section-number">Enjeux 5</span> Lutter contre le changement climatique<a href="climat.html#climat" class="anchor-section" aria-label="Anchor link to header"></a></h1> <h1><span class="header-section-number">Enjeux 5</span> Lutter contre le changement climatique<a href="climat.html#climat" class="anchor-section" aria-label="Anchor link to header"></a></h1>
<div id="carte_08a_réduire-les-émissions-de-ges-par-secteur.pdf" class="section level3 hasAnchor" number="5.0.1"> <div id="carte_08a_réduire-les-émissions-de-ges-par-secteur.pdf" class="section level3 hasAnchor" number="5.0.1">
<h3><span class="header-section-number">5.0.1</span> Carte_08a_Réduire les émissions de GES par secteur.pdf<a href="climat.html#carte_08a_réduire-les-émissions-de-ges-par-secteur.pdf" class="anchor-section" aria-label="Anchor link to header"></a></h3> <h3><span class="header-section-number">5.0.1</span> Carte_08a_Réduire les émissions de GES par secteur.pdf<a href="climat.html#carte_08a_réduire-les-émissions-de-ges-par-secteur.pdf" class="anchor-section" aria-label="Anchor link to header"></a></h3>
<p><a href="https://teo-paysdelaloire.terristory.fr/?zone=region&amp;maille=epci&amp;zone_id=52&amp;analysis=9773&amp;theme=%C3%89missions%20de%20gaz%20%C3%A0%20effet%20de%20serre&amp;nom_territoire=Pays%20de%20la%20Loire" class="uri">https://teo-paysdelaloire.terristory.fr/?zone=region&amp;maille=epci&amp;zone_id=52&amp;analysis=9773&amp;theme=%C3%89missions%20de%20gaz%20%C3%A0%20effet%20de%20serre&amp;nom_territoire=Pays%20de%20la%20Loire</a> <p>Calcul du pourcentage par EPCI en SQL par Christine
Calcul du pourcentage par EPCI en SQL par Christine
Sémiologie à revoir</p> Sémiologie à revoir</p>
<p>Données Basemis issues d’un téléchargement sur terristory <a href="https://teo-paysdelaloire.terristory.fr/?zone=region&amp;maille=epci&amp;zone_id=52&amp;analysis=9773&amp;theme=%C3%89missions%20de%20gaz%20%C3%A0%20effet%20de%20serre&amp;nom_territoire=Pays%20de%20la%20Loire" class="uri">https://teo-paysdelaloire.terristory.fr/?zone=region&amp;maille=epci&amp;zone_id=52&amp;analysis=9773&amp;theme=%C3%89missions%20de%20gaz%20%C3%A0%20effet%20de%20serre&amp;nom_territoire=Pays%20de%20la%20Loire</a></p> <p>Données Basemis issues d’un téléchargement sur terristory <a href="https://teo-paysdelaloire.terristory.fr/?zone=region&amp;maille=epci&amp;zone_id=52&amp;analysis=9773&amp;theme=%C3%89missions%20de%20gaz%20%C3%A0%20effet%20de%20serre&amp;nom_territoire=Pays%20de%20la%20Loire" class="uri">https://teo-paysdelaloire.terristory.fr/?zone=region&amp;maille=epci&amp;zone_id=52&amp;analysis=9773&amp;theme=%C3%89missions%20de%20gaz%20%C3%A0%20effet%20de%20serre&amp;nom_territoire=Pays%20de%20la%20Loire</a></p>
<p><a href="https://gitlab-forge.din.developpement-durable.gouv.fr/dreal-pdl/csd/cartes.enjeux/-/issues/14">Ticket 14</a></p>
<p>Carte à reproduire :</p>
<div class="sourceCode" id="cb1"><pre class="sourceCode r"><code class="sourceCode r"><span id="cb1-1"><a href="climat.html#cb1-1" tabindex="-1"></a>knitr<span class="sc">::</span><span class="fu">include_graphics</span>(<span class="st">&quot;https://www.pays-de-la-loire.developpement-durable.gouv.fr/IMG/png/carte_08a_reduire_les_emissions_de_ges_par_secteur.png&quot;</span>)</span></code></pre></div>
<p><img src="https://www.pays-de-la-loire.developpement-durable.gouv.fr/IMG/png/carte_08a_reduire_les_emissions_de_ges_par_secteur.png" width="100%" /></p>
</div> </div>
<div id="carte_09a_consommation-couverte-par-la-production-denr.pdf" class="section level3 hasAnchor" number="5.0.2"> <div id="carte_09a_consommation-couverte-par-la-production-denr.pdf" class="section level3 hasAnchor" number="5.0.2">
<h3><span class="header-section-number">5.0.2</span> Carte_09a_Consommation couverte par la production d’EnR.pdf<a href="climat.html#carte_09a_consommation-couverte-par-la-production-denr.pdf" class="anchor-section" aria-label="Anchor link to header"></a></h3> <h3><span class="header-section-number">5.0.2</span> Carte_09a_Consommation couverte par la production d’EnR.pdf<a href="climat.html#carte_09a_consommation-couverte-par-la-production-denr.pdf" class="anchor-section" aria-label="Anchor link to header"></a></h3>
...@@ -259,42 +262,42 @@ Sémiologie à reprendre, énergie majoritaire pas mal</p> ...@@ -259,42 +262,42 @@ Sémiologie à reprendre, énergie majoritaire pas mal</p>
<script> <script>
gitbook.require(["gitbook"], function(gitbook) { gitbook.require(["gitbook"], function(gitbook) {
gitbook.start({ gitbook.start({
"sharing": { "sharing": {
"github": false, "github": false,
"facebook": true, "facebook": true,
"twitter": true, "twitter": true,
"linkedin": false, "linkedin": false,
"weibo": false, "weibo": false,
"instapaper": false, "instapaper": false,
"vk": false, "vk": false,
"whatsapp": false, "whatsapp": false,
"all": ["facebook", "twitter", "linkedin", "weibo", "instapaper"] "all": ["facebook", "twitter", "linkedin", "weibo", "instapaper"]
}, },
"fontsettings": { "fontsettings": {
"theme": "white", "theme": "white",
"family": "sans", "family": "sans",
"size": 2 "size": 2
}, },
"edit": { "edit": {
"link": null, "link": null,
"text": null "text": null
}, },
"history": { "history": {
"link": null, "link": null,
"text": null "text": null
}, },
"view": { "view": {
"link": null, "link": null,
"text": null "text": null
}, },
"download": ["cartes_enjeux_pdl.pdf"], "download": ["cartes_enjeux_pdl.pdf"],
"search": { "search": {
"engine": "fuse", "engine": "fuse",
"options": null "options": null
}, },
"toc": { "toc": {
"collapse": "subsection" "collapse": "subsection"
} }
}); });
}); });
</script> </script>
......
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment