Évolution du revenu disponible brut et du pouvoir d’achat - Données trimestrielles

Data - INSEE

Author

François Geerolf

Info

source dataset Title .html .rData
insee reve-niv-vie-pouv-achat-trim Évolution du revenu disponible brut et du pouvoir d’achat - Données trimestrielles 2025-10-10 2024-12-11

Données sur le pouvoir d’achat

source dataset Title .html .rData
insee CNA-2014-RDB Revenu et pouvoir d’achat des ménages 2025-10-10 2025-10-09
insee CNT-2014-CSI Comptes de secteurs institutionnels 2025-10-10 2025-10-09
insee T_7401 7.401 – Compte des ménages (S14) (En milliards d'euros) 2025-10-10 2025-09-29
insee conso-eff-fonction Consommation effective des ménages par fonction 2025-10-10 2022-06-14
insee econ-gen-revenu-dispo-pouv-achat-2 Revenu disponible brut et pouvoir d’achat - Données annuelles 2025-10-10 2024-07-05
insee reve-conso-evo-dep-pa Évolution de la dépense et du pouvoir d’achat des ménages - Données annuelles de 1960 à 2023 2025-10-10 2024-12-11
insee reve-niv-vie-individu-activite NA NA NA
insee reve-niv-vie-pouv-achat-trim Évolution du revenu disponible brut et du pouvoir d’achat - Données trimestrielles 2025-10-10 2024-12-11
insee t_men_val Revenu, pouvoir d'achat et comptes des ménages - Valeurs aux prix courants 2025-10-10 2025-08-29
insee t_pouvachat_val Pouvoir d'achat et ratios des comptes des ménages 2025-10-10 2025-08-29
insee t_recapAgent_val Récapitulatif des séries des comptes d'agents 2025-10-10 2025-09-29
insee t_salaire_val Salaire moyen par tête - SMPT (données CVS) 2025-10-10 2025-08-29
oecd HH_DASH Household Dashboard 2025-09-29 2023-09-09

LAST_COMPILE

LAST_COMPILE
2025-10-11

Bibliographie en lien

Français

  • “Mesurer le pouvoir d’achat”, F. Geerolf, Document de travail, Juillet 2024. [pdf]

  • “Inflation en France: IPC ou IPCH ?”, F. Geerolf, Document de travail, Juillet 2024. [pdf]

  • “La taxe inflationniste, le pouvoir d’achat, le taux d’épargne et le déficit public”, F. Geerolf, Document de travail, Juillet 2024. [pdf]

Info

  • Évolution du revenu disponible brut et du pouvoir d’achat. Données trimestrielles du T1-1949 au T2-2023. html / xlsx

Revenu disponible brut. Il s’agit de la part du revenu qui reste à la disposition du ménage pour consommer et épargner, une fois déduits les prélèvements sociaux et les impôts.

Les ressources comprennent : - les revenus d’activité (salaires, revenus des entrepreneurs individuels…), - les revenus du patrimoine (dividendes, intérêts, loyers), - les prestations sociales (y compris les pensions de retraite et les indemnités de chômage), - les transferts courants (notamment les indemnités d’assurance nette des primes). Les charges comprennent notamment les impôts directs (impôt sur le revenu, taxe d’habitation, CSG…).

Variable

Code 
`reve-niv-vie-pouv-achat-trim` %>%
  group_by(Variable) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional
Variable Nobs
Pouvoir d'achat du RDB 303
Pouvoir d'achat du RDB par UC 303
RDB par unité de consommation (UC) 303
Revenu disponible brut (RDB) 303
Taux d'épargne 303
Taux d'épargne financière 303

date

Code 
`reve-niv-vie-pouv-achat-trim` %>%
  group_by(date) %>%
  summarise(Nobs = n()) %>%
  arrange(desc(date)) %>%
  print_table_conditional

Evolution

2017T2-

% change

Code 
`reve-niv-vie-pouv-achat-trim` %>%
  filter(date %in% c(max(date), as.Date("2017-04-01"))) %>%
  spread(date, value) %>%
  print_table_conditional(.)
Variable vintage 2017-04-01 2024-07-01
Pouvoir d'achat du RDB 2024T1 0.5645627 0.85728464
Pouvoir d'achat du RDB par UC 2024T1 0.41943885 0.72809948
RDB par unité de consommation (UC) 2024T1 0.429191 0.78528481
Revenu disponible brut (RDB) 2024T1 0.57432894 0.91454332
Taux d'épargne 2024T1 14.0892012 18.15883078
Taux d'épargne financière 2024T1 4.08615217 8.80432214

Evolution pouvoir d’achat par UC

Tous

Linear

Code 
plot_linear <- `reve-niv-vie-pouv-achat-trim` %>%
  filter(grepl(pouvoir_achat_RDB_UC, Variable)) %>%
  arrange(date) %>%
  mutate(value = as.numeric(value)) %>%
  filter(!is.na(value)) %>%
  mutate(value = ifelse(date == min(date), 0, value)) %>%
  mutate(index = 100*cumprod(1+value/100)) %>%
  ggplot + geom_line(aes(x = date, y = index)) +
  scale_y_continuous(breaks = seq(100, 1000, 10)) +
  scale_x_date(breaks = seq(1950, 2100, 10) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme_minimal() + xlab("") + ylab("Pouvoir d'achat du RDB par UC (Base 100 = 1980)")

plot_linear

Log

Code 
plot_log <- plot_linear +
  scale_y_log10(breaks = seq(100, 900, 10))

plot_log

Linear, Log

Code 
ggarrange(plot_linear, plot_log + ylab(""))

1980-

Linear

Code 
plot_linear <- `reve-niv-vie-pouv-achat-trim` %>%
  filter(grepl(pouvoir_achat_RDB_UC, Variable),
         date >= as.Date("1980-01-01")) %>%
  arrange(date) %>%
  mutate(value = as.numeric(value),
         value = ifelse(date == min(date), 0, value)) %>%
  mutate(index = 100*cumprod(1+value/100)) %>%
  ggplot + geom_line(aes(x = date, y = index)) +
  scale_y_continuous(breaks = seq(100, 1000, 10)) +
  scale_x_date(breaks = seq(1950, 2100, 10) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme_minimal() + xlab("") + ylab("Pouvoir d'achat du RDB par UC (Base 100 = 1980)")

plot_linear

Log

Code 
plot_log <- plot_linear +
  scale_y_log10(breaks = seq(100, 900, 10))

plot_log

Linear, Log

Code 
ggarrange(plot_linear, plot_log + ylab(""))

Evolution pouvoir d’achat

Tous

Linear

Code 
plot_linear <- `reve-niv-vie-pouv-achat-trim` %>%
  filter(Variable == "Pouvoir d'achat du RDB") %>%
  arrange(date) %>%
  mutate(value = as.numeric(value),
         value = ifelse(date == min(date), 0, value)) %>%
  mutate(index = 100*cumprod(1+value/100)) %>%
  ggplot + geom_line(aes(x = date, y = index)) +
  scale_y_continuous(breaks = seq(100, 1000, 100)) +
  scale_x_date(breaks = seq(1950, 2100, 10) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme_minimal() + xlab("") + ylab("Pouvoir d'achat du RDB (Base 100 = 1949)")

plot_linear

Log

Code 
plot_log <- plot_linear +
  scale_y_log10(breaks = seq(100, 900, 100))

plot_log

Linear, Log

Code 
ggarrange(plot_linear, plot_log + ylab(""))

1960-

Linear

Code 
plot_linear <- `reve-niv-vie-pouv-achat-trim` %>%
  filter(Variable == "Pouvoir d'achat du RDB",
         date >= as.Date("1960-01-01")) %>%
  arrange(date) %>%
  mutate(value = as.numeric(value),
         value = ifelse(date == min(date), 0, value)) %>%
  mutate(index = 100*cumprod(1+value/100)) %>%
  ggplot + geom_line(aes(x = date, y = index)) +
  scale_y_continuous(breaks = seq(100, 1000, 100)) +
  scale_x_date(breaks = seq(1950, 2100, 10) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme_minimal() + xlab("") + ylab("Pouvoir d'achat du RDB (Base 100 = 1960)")

plot_linear

Log

Code 
plot_log <- plot_linear +
  scale_y_log10(breaks = seq(100, 900, 100))

plot_log

Linear, Log

Code 
ggarrange(plot_linear, plot_log + ylab(""))

1980-

Linear

Code 
plot_linear <- `reve-niv-vie-pouv-achat-trim` %>%
  filter(Variable == "Pouvoir d'achat du RDB",
         date >= as.Date("1980-01-01")) %>%
  arrange(date) %>%
  mutate(value = as.numeric(value),
         value = ifelse(date == min(date), 0, value)) %>%
  mutate(index = 100*cumprod(1+value/100)) %>%
  ggplot + geom_line(aes(x = date, y = index)) +
  scale_y_continuous(breaks = seq(100, 1000, 10)) +
  scale_x_date(breaks = seq(1950, 2100, 10) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y")) +
  theme_minimal() + xlab("") + ylab("Pouvoir d'achat du RDB (Base 100 = 1980)")

plot_linear

Log

Code 
plot_log <- plot_linear +
  scale_y_log10(breaks = seq(100, 900, 10))

plot_log

Linear, Log

Code 
ggarrange(plot_linear, plot_log + ylab(""))