Info

source	dataset	.html	.RData
insee	reve-niv-vie-individu-activite	2024-10-29	NA

Info

Revenu, niveau de vie et pauvreté en 2019. Enquête Revenus fiscaux et sociaux (ERFS) - Insee Résultats. html
Niveau de vie selon l’âge. Données annuelles de 1996 à 2019. html

Données sur le pouvoir d’achat

source	dataset	.html	.RData
insee	CNA-2014-RDB	2024-11-05	2024-11-05
insee	CNT-2014-CSI	2024-11-05	2024-11-05
insee	conso-eff-fonction	2024-11-05	2022-06-14
insee	econ-gen-revenu-dispo-pouv-achat-2	2024-11-05	2024-07-05
insee	reve-conso-evo-dep-pa	2024-11-05	2024-09-05
insee	reve-niv-vie-individu-activite	2024-10-29	NA
insee	reve-niv-vie-pouv-achat-trim	2024-10-29	2024-09-05
insee	T_7401	2024-10-18	2024-10-18
insee	t_men_val	2024-10-29	2024-09-02
insee	t_pouvachat_val	2024-10-29	2024-09-04
insee	t_recapAgent_val	2024-10-29	2024-09-02
insee	t_salaire_val	2024-11-03	2024-09-02
oecd	HH_DASH	2024-09-15	2023-09-09

year

Code

`reve-niv-vie-individu-activite-moyen` %>%
  group_by(year) %>%
  summarise(Nobs = n()) %>%
  print_table_conditional()

year	Nobs
1996	10
1997	10
1998	10
1999	10
2000	10
2001	10
2002	10
2003	10
2004	10
2005	10
2006	10
2007	10
2008	10
2009	10
2010	10
20102	10
2011	10
2012	10
20123	10
2013	10
2014	10
2015	10
2016	10
2017	10
2018	10
2019	10

variable

Code

`reve-niv-vie-individu-activite-moyen` %>%
  group_by(activite) %>%
  summarise(Nobs = n()) %>%
  print_table_conditional()

activite	Nobs
Actifs occupés	26
Actifs âgés de 18 ans ou plus	26
Autres inactifs (dont étudiants)	26
Chômeurs	26
Enfants de moins de 18 ans4	26
Ensemble	26
Inactifs âgés de 18 ans ou plus	26
Retraités	26
Indépendants	26
Salariés	26

Niveau de vie moyen

Table 1996-2008, 2008-2019

Javascript

Code

`reve-niv-vie-individu-activite-moyen` %>%
  mutate(year = as.numeric(year)) %>%
  filter(year %in% c(1996, 2008, 2019)) %>%
  select(activite, year, value) %>%
  spread(year, value) %>%
  mutate(`1996-2008` = round(100*((`2008`/`1996`)^(1/12)-1), 2),
         `2008-2019` = round(100*((`2019`/`2008`)^(1/11)-1), 2)) %>%
  print_table_conditional()

activite	1996	2008	2019	1996-2008	2008-2019
Indépendants	25040	33930	33660	2.56	-0.07
Salariés	22280	26120	27360	1.33	0.42
Actifs âgés de 18 ans ou plus	21670	26230	27300	1.60	0.36
Actifs occupés	22620	26960	28140	1.47	0.39
Autres inactifs (dont étudiants)	18500	21730	20850	1.35	-0.38
Chômeurs	14930	17570	17780	1.37	0.11
Enfants de moins de 18 ans4	18560	22540	22530	1.63	0.00
Ensemble	20430	24720	25190	1.60	0.17
Inactifs âgés de 18 ans ou plus	20100	24070	24050	1.51	-0.01
Retraités	20980	25170	25390	1.53	0.08

Graph

Code

`reve-niv-vie-individu-activite-moyen` %>%
  filter(!is.na(activite)) %>%
  mutate(year = as.numeric(year)) %>%
  filter(year %in% c(1996, 2008, 2019)) %>%
  spread(year, value) %>%
  transmute(activite,
            `1996-2008` = (`2008`/`1996`)^(1/12)-1,
            `2008-2019` = (`2019`/`2008`)^(1/11)-1) %>%
  gather(variable, value, -activite) %>%
  ggplot + geom_line(aes(x = activite, y = value, color = variable, group = variable)) +
  theme_minimal() +
  theme(legend.position = c(0.15, 0.55),
        legend.title = element_blank(),
        axis.text.x = element_text(angle = 45, vjust = 1, hjust = 1)) +
  xlab("") + ylab("Gain de niveau de vie en € constants/an") +
  scale_y_continuous(breaks = 0.01*seq(-30, 50, 0.2),
                     labels = percent_format(accuracy = .1)) + 
  geom_hline(yintercept = 0, linetype = "dashed",  color = "black")