Population et ménages - population_menages

Données - INSEE

Auteur

François Geerolf

Last observation: 2025 (N = 12)

First observation: 1960 (N = 9)

Last data update: 08 sept. 2026, 14:35

Last compile: 24 sept. 2026, 01:22

Structure

Population

Code 
`population_menages` |>
  filter(label == "Valeur non transformée",
         sheet %in% c("Population_France", "Population_métropole")) |>
  ggplot() + theme_minimal() + xlab("") + ylab("Population (milliers)") +
  geom_line(aes(x = year, y = value, color = sheet)) +
  scale_x_continuous(breaks = seq(1960, 2030, 10)) +
  theme(legend.title = element_blank(), legend.position = "bottom")

Nombre de ménages

Code 
`population_menages` |>
  filter(label == "Valeur non transformée",
         sheet %in% c("Menages_France", "Ménages_métropole")) |>
  ggplot() + theme_minimal() + xlab("") + ylab("Nombre de ménages (milliers)") +
  geom_line(aes(x = year, y = value, color = sheet)) +
  scale_x_continuous(breaks = seq(1960, 2030, 10)) +
  theme(legend.title = element_blank(), legend.position = "bottom")

Taille moyenne des ménages

Le nombre de personnes par ménage passe de plus de 3 dans les années 1960 à environ 2,2 aujourd’hui : décohabitation, vieillissement, hausse des familles monoparentales et des personnes seules.

Code 
niv |>
  ggplot() + theme_minimal() + xlab("") + ylab("Personnes par ménage (France)") +
  geom_line(aes(x = year, y = Population_France / Menages_France)) +
  scale_x_continuous(breaks = seq(1980, 2030, 10)) +
  scale_y_continuous(breaks = seq(2, 3.4, 0.2))

Croissance annuelle : population et ménages

Le nombre de ménages croît plus vite que la population — c’est la traduction de la baisse de leur taille moyenne.

Code 
`population_menages` |>
  filter(label == "Croissance annuelle de l’indice",
         sheet %in% c("Population_France", "Menages_France")) |>
  ggplot() + theme_minimal() + xlab("") + ylab("Croissance annuelle") +
  geom_hline(yintercept = 0, color = "grey60") +
  geom_line(aes(x = year, y = (value - 100) / 100, color = sheet)) +
  scale_x_continuous(breaks = seq(1980, 2030, 10)) +
  scale_y_continuous(labels = percent_format(accuracy = 0.5)) +
  theme(legend.title = element_blank(), legend.position = "bottom")

Table (2025)

Code 
`population_menages` |>
  filter(year == last_y, label == "Valeur non transformée") |>
  transmute(Série = sheet, `Milliers` = round(value, 1)) |>
  print_table_conditional()
Série Milliers
Menages_France 31883.1
Ménages_métropole 30965.9
Population_France 68997.5
Population_métropole 66685.7