From e9b1dbb712e566558976a0d5041d9b5e7e56ec49 Mon Sep 17 00:00:00 2001
From: Denis DOUILLARD <denis.douillard@developpement-durable.gouv.fr>
Date: Mon, 24 Jun 2024 11:12:36 +0200
Subject: [PATCH] =?UTF-8?q?M=C3=AAl=C3=A9e=20Daniel?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit
---
R/creer_graphique_evolution_trim.R | 2 +-
.../templates/ecln_conjoncture/skeleton/header_2.html | 2 +-
.../templates/ecln_conjoncture/skeleton/skeleton.Rmd | 8 +++-----
man/indic_ecln.Rd | 2 +-
4 files changed, 6 insertions(+), 8 deletions(-)
diff --git a/R/creer_graphique_evolution_trim.R b/R/creer_graphique_evolution_trim.R
index 266fcd4..a730a2b 100644
--- a/R/creer_graphique_evolution_trim.R
+++ b/R/creer_graphique_evolution_trim.R
@@ -117,7 +117,7 @@ creer_graphique_evolution_trim <- function(data = indic_ecln,
ggplot2::scale_colour_manual(values = c("#E1000F", "#000091")) +
ggplot2::scale_fill_manual(values = c("#E1000F","#000091")) +
ggplot2::labs(x = "", y = "", title = titre, subtitle = sous_titre,
- caption = "Source : SDES - Enquête sur la commercialisation des logements neufs (ECLN)\nMoyenne annuelle : valeur observ\u00e9e en moyenne lors des 4 derniers trimestres") +
+ caption = "Source : SDES - Enqu\u00EAte sur la commercialisation des logements neufs (ECLN)\nMoyenne annuelle : valeur observ\u00e9e en moyenne lors des 4 derniers trimestres") +
ggplot2::theme(plot.caption = element_text(size = 10))+
ggplot2::scale_y_continuous(expand = c(0, 0), labels = function(l) format(l, scientific = FALSE, big.mark = " ", decimal.mark = ","), limits = c(0, NA)) +
ggplot2::scale_x_date(date_breaks = "1 year", date_labels = "%Y", expand = c(0, 0), limits = c(min(per), max(per) + months(12)))
diff --git a/inst/rmarkdown/templates/ecln_conjoncture/skeleton/header_2.html b/inst/rmarkdown/templates/ecln_conjoncture/skeleton/header_2.html
index 985a145..1da9d6e 100644
--- a/inst/rmarkdown/templates/ecln_conjoncture/skeleton/header_2.html
+++ b/inst/rmarkdown/templates/ecln_conjoncture/skeleton/header_2.html
@@ -11,7 +11,7 @@
<div class="col-md-8">
<p style="font-size:160%; text-align:left; color:#323787; line-height:12pt"><strong> </strong></p>
-<p style="font-size:240%; text-align:right; color:#323787; line-height:32pt">
+<p style="font-size:240%; text-align:right; color:#323787; line-height:30pt">
<strong>La commercialisation<br>des logements neufs<br>dans les Pays de la Loire</strong></p>
</div>
diff --git a/inst/rmarkdown/templates/ecln_conjoncture/skeleton/skeleton.Rmd b/inst/rmarkdown/templates/ecln_conjoncture/skeleton/skeleton.Rmd
index f691987..1b47e30 100644
--- a/inst/rmarkdown/templates/ecln_conjoncture/skeleton/skeleton.Rmd
+++ b/inst/rmarkdown/templates/ecln_conjoncture/skeleton/skeleton.Rmd
@@ -123,7 +123,7 @@ creer_graphique_evolution_trim(
<hr>
À COMPLETER ET À AUTOMATISER
-Dans les `r mapfactory::get_nom_reg(params$region)`, 771 logements neufs destinés à des particuliers ont été vendus au `r params$trimestre``r ifelse(params$trimestre == "1","<sup>er</sup>","<sup>e</sup>")` trimestre de `r params$annee`, soit 11 % de moins qu’au même trimestre de 2023. Il s'agit du 5<sup>e</sup> trimestre consécutif au cours duquel moins de mille logements sont réservés (avec un dépôt d’arrhes au promoteur immobilier). Un volume de réservations à quatre chiffres avait été systématiquement dépassé depuis 2017 (année de refonte de l’enquête ECLN), soit pendant vingt-quatre trimestres de suite.
+Dans les `r mapfactory::get_nom_reg(params$region)`, 771 logements neufs destinés à des particuliers ont été vendus au `r params$trimestre``r ifelse(params$trimestre == "1","<sup>er</sup>","<sup>e</sup>")` trimestre de `r params$annee`, soit 11 % de moins qu’au même trimestre de 2023. Il s'agit du 5<sup>e</sup> trimestre consécutif au cours duquel moins de mille logements sont réservés (avec un dépôt d’arrhes au promoteur immobilier). Un volume de réservations à quatre chiffres avait été systématiquement dépassé depuis 2017 (année de refonte de l’ECLN), soit pendant vingt-quatre trimestres de suite.
En cumul annuel, le recul des ventes est d'un quart (- 25,5 %), contre un tiers en France métropolitaine (- 33,4 %). 3 480 logements ont ainsi été vendus dans les `r mapfactory::get_nom_reg(params$region)` lors des quatre derniers trimestres, c'est moitié moins qu'avant la crise sanitaire.
</div>
@@ -247,7 +247,6 @@ creer_graphique_evolution_trim(
En cumul annuel, les réservations ont chuté d'un quart. 3 246 appartements ont été vendus au cours des quatre derniers trimestres, à un prix moyen de 4 471 € au m² (+ 1,6 % par rapport aux quatre trimestres précédents).
</div>
-
</div>
@@ -368,7 +367,6 @@ Seulement quarante-trois maisons individuelles groupées, commercialisées par d
En cumul annuel, le recul des ventes est de 33 % dans les Pays de la Loire et de 38 % en France métropolitaine. 234 maisons groupées ont été vendues en douze mois dans la région, soit seulement 6,7 % des réservations totales de logements. Cette part est de 5,3 % dans l'Hexagone.
</div>
-
</div>
@@ -466,7 +464,7 @@ L’enquête sur la commercialisation des logements neufs (ECLN) est réalisée
La base de sondage de l'ECLN est constituée de l'ensemble des permis de construire de plus de quatre logements (appartements et/ou maisons groupées), destinés à la vente quel que soit le mode de financement ou leur utilisation finale (résidence principale ou secondaire, achat en vue d’une location).
-Environ un tiers de ces programmes d'au moins cinq logements sont exclues du champ de l'enquête. Le hors champ de l'ECLN comprend les projets qui ne sont pas destinés intégralement à la vente ou qui ne s'apparente pas à de la commercialisation immobilière classique. Il recouvre plusieurs cas de figure :
+Environ un tiers de ces programmes d'au moins cinq logements sont exclues du champ de l'enquête. Le hors champ de l'ECLN comprend les projets qui ne sont pas destinés intégralement à la vente ou qui ne s'apparentent pas à de la commercialisation immobilière classique. Il recouvre plusieurs cas de figure :
* les logements construits pour être loués directement par le promoteur,
@@ -513,7 +511,7 @@ Le tableau ci-dessous indique pour les variables sensibles les critères de diff
## Les autres données non communiquées
-En complément du secret statistique, une autre situation de données manquantes est celle des valeurs dites non significatives. Dans la publication, elle concerne les illustrations (tableaux de chiffres clefs et cartes) où est représentée l'évolution d'un indicateur en glissement annuel, c'est à dire par rapport à sa valeur observée quatre trimestres plus tôt. Ces taux d'évolution sont considérés comme non significatifs quand la valeur de comparaison est nulle, ne permettant pas le calcul du pourcentage de variation.
+En complément du secret statistique, une autre catégorie de données manquantes est celle des valeurs dites non significatives. Dans la publication, elle concerne les illustrations (tableaux de chiffres clefs et cartes) où est représentée l'évolution d'un indicateur en glissement annuel, c'est à dire par rapport à sa valeur observée quatre trimestres plus tôt. Ces taux d'évolution sont considérés comme non significatifs quand la valeur de comparaison est nulle, ne permettant pas le calcul du pourcentage de variation.
Ce cas de figure se rencontre à plusieurs endroits dans la publication :
diff --git a/man/indic_ecln.Rd b/man/indic_ecln.Rd
index 3a09558..1b1b57b 100644
--- a/man/indic_ecln.Rd
+++ b/man/indic_ecln.Rd
@@ -6,7 +6,7 @@
\alias{indic_ecln}
\title{Table contenant les différents indicateurs de la source ecln utiles pour la publication.}
\format{
-Table de 96720 lignes et 10 colonnes:
+Table de 2450674 lignes et 9 colonnes:
\describe{
\item{TypeZone}{Type de territoire}
\item{CodeZone}{Code du territoire}
--
GitLab