5.201-203 - Dépense de consommation finale des ménages par produit (38 postes) - T_5201_5203

Données - INSEE

Auteur

François Geerolf

Last observation: 2025 (N = 288)

First observation: 1949 (N = 66)

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

Last compile: 24 sept. 2026, 01:33

Structure

Consommation des ménages par grande branche de produit

Les ménages consomment de moins en moins de produits industriels (alimentation, biens manufacturés) et de plus en plus de services marchands (logement, transports, loisirs, restauration).

Code 
`T_5201_5203` |>
  filter(sheet == "T_5201 en niveau", grepl("^A5_", code)) |>
  group_by(year) |>
  mutate(part = value / sum(value)) |>
  ungroup() |>
  arrange(desc(code)) |>
  mutate(label = factor(label, levels = unique(label))) |>
  ggplot() + theme_minimal() + xlab("") + ylab("Part de la consommation des ménages") +
  geom_area(aes(x = year, y = part, fill = label)) +
  scale_x_continuous(breaks = seq(1950, 2030, 10)) +
  scale_y_continuous(labels = percent_format(accuracy = 1)) +
  scale_fill_manual(values = viridis(5)) +
  theme(legend.title = element_blank(), legend.position = "bottom") +
  guides(fill = guide_legend(nrow = 3))

En volume (base 100 en 1980)

Code 
`T_5201_5203` |>
  filter(sheet == "T_5202 en niveau", grepl("^A5_", code)) |>
  group_by(code) |>
  mutate(value = 100 * value / value[year == 1980]) |>
  ungroup() |>
  ggplot() + theme_minimal() + xlab("") + ylab("Volume (1980 = 100, échelle log)") +
  geom_line(aes(x = year, y = value, color = label)) +
  scale_x_continuous(breaks = seq(1950, 2030, 10)) +
  scale_y_log10() +
  theme(legend.title = element_blank(), legend.position = "bottom") +
  guides(color = guide_legend(nrow = 3))

Prix (base 100 en 2000)

Code 
`T_5201_5203` |>
  filter(sheet == "T_5203 en niveau", grepl("^A5_", code)) |>
  group_by(code) |>
  mutate(value = 100 * value / value[year == 2000]) |>
  ungroup() |>
  ggplot() + theme_minimal() + xlab("") + ylab("Prix (2000 = 100)") +
  geom_line(aes(x = year, y = value, color = label)) +
  scale_x_continuous(breaks = seq(1950, 2030, 10)) +
  theme(legend.title = element_blank(), legend.position = "bottom") +
  guides(color = guide_legend(nrow = 3))

Consommation par produit détaillé (2025)

Code 
`T_5201_5203` |>
  filter(sheet == "T_5201 en niveau", year == last_y, grepl("^A38_", code)) |>
  mutate(label = reorder(str_trunc(label, 55), value)) |>
  ggplot() + theme_minimal() + xlab("") + ylab("Consommation des ménages (Mds €)") +
  geom_col(aes(x = label, y = value), fill = "#2b6cb0") +
  coord_flip()

Table (2025)

Code 
`T_5201_5203` |>
  filter(sheet == "T_5201 en niveau", year == last_y, grepl("^A5_", code)) |>
  transmute(Produit = label, Code = code, `Mds €` = round(value, 1),
            `% du total` = round(100 * value / sum(value), 1)) |>
  print_table_conditional()
Produit Code Mds € % du total
Produits de l'agriculture et de la chasse et services annexes A5_AZ 36.7 2.3
Produits industriels (hors travaux de construction) A5_BE 621.4 39.7
Constructions et travaux de construction A5_FZ 30.0 1.9
Services principalement marchands A5_GU 798.9 51.0
Services principalement non marchands (*) A5_OQ 79.0 5.0