L’empreinte foncière des logements occupés en 2022, par bassin de vie - statistiques_sdes_empreinte_fonciere_2022

Données - SDES

L’empreinte foncière médiane d’un logement occupé (surface de la parcelle, en m2) mesurée par le SDES pour chacun des ~1 680 bassins de vie de France métropolitaine, en 2022.

Distribution de l’empreinte foncière médiane, tous logements

Code
statistiques_sdes_empreinte_fonciere_2022 |>
  filter(indicateur == "empreinte_mediane_ensemble") |>
  ggplot() + geom_histogram(aes(x = value), bins = 50, fill = rgb(0.2, 0.4, 0.65)) +
  theme_minimal() + xlab("Empreinte foncière médiane (m2)") + ylab("Nombre de bassins de vie") +
  scale_x_continuous(labels = scales::label_number(big.mark = " "))

Bassins de vie à la plus forte empreinte foncière médiane

Code
statistiques_sdes_empreinte_fonciere_2022 |>
  filter(indicateur == "empreinte_mediane_ensemble") |>
  slice_max(value, n = 20) |>
  mutate(libelle_bv = fct_reorder(libelle_bv, value)) |>
  ggplot() + geom_col(aes(x = libelle_bv, y = value, fill = value), show.legend = F) +
  coord_flip() +
  theme_minimal() + xlab("") + ylab("Empreinte foncière médiane (m2)") +
  theme(axis.text.y = element_text(size = 7)) +
  scale_fill_viridis_c()

Bassins de vie à la plus faible empreinte foncière médiane

Code
statistiques_sdes_empreinte_fonciere_2022 |>
  filter(indicateur == "empreinte_mediane_ensemble") |>
  slice_min(value, n = 20) |>
  mutate(libelle_bv = fct_reorder(libelle_bv, value, .desc = TRUE)) |>
  ggplot() + geom_col(aes(x = libelle_bv, y = value, fill = value), show.legend = F) +
  coord_flip() +
  theme_minimal() + xlab("") + ylab("Empreinte foncière médiane (m2)") +
  theme(axis.text.y = element_text(size = 7)) +
  scale_fill_viridis_c(direction = -1)

Habitat individuel vs collectif

Code
statistiques_sdes_empreinte_fonciere_2022 |>
  filter(indicateur %in% c("empreinte_mediane_individuel", "empreinte_mediane_collectif")) |>
  ggplot() + geom_density(aes(x = value, fill = indicateur), alpha = 0.5) +
  theme_minimal() + xlab("Empreinte foncière médiane (m2)") + ylab("Densité") +
  theme(legend.title = element_blank()) +
  scale_x_continuous(labels = scales::label_number(big.mark = " ")) +
  scale_fill_manual(values = c("empreinte_mediane_individuel" = rgb(0.75, 0.5, 0.15),
                                "empreinte_mediane_collectif" = rgb(0.2, 0.45, 0.35)),
                     labels = c("empreinte_mediane_individuel" = "Individuel", "empreinte_mediane_collectif" = "Collectif"))

Part de l’habitat individuel dans le parc de logements occupés

Code
statistiques_sdes_empreinte_fonciere_2022 |>
  filter(indicateur == "part_habitat_individuel") |>
  ggplot() + geom_histogram(aes(x = value), bins = 50, fill = rgb(0.6, 0.2, 0.35)) +
  theme_minimal() + xlab("Part de l'habitat individuel (%)") + ylab("Nombre de bassins de vie")