Évolutions de la dépense des ménages, du pouvoir d’achat et du taux d’épargne, 1960-2020 - IP1864_fig2

Données - INSEE

Dépense des ménages et pouvoir d’achat, évolutions annuelles

Code
IP1864_fig2 |>
  filter(variable != "Taux d'épargne") |>
  ggplot() + geom_line(aes(x = annee, y = value, color = variable), linewidth = 0.8) +
  theme_minimal() + xlab("") + ylab("Évolution annuelle (%)") +
  theme(legend.title = element_blank(), legend.position = "bottom") +
  guides(color = guide_legend(nrow = 2)) +
  geom_hline(yintercept = 0, linetype = "dashed") +
  scale_color_viridis_d()

Taux d’épargne des ménages

Code
IP1864_fig2 |>
  filter(variable == "Taux d'épargne") |>
  ggplot() + geom_line(aes(x = annee, y = value), color = rgb(0.2, 0.45, 0.35), linewidth = 1) +
  theme_minimal() + xlab("") + ylab("Taux d'épargne (%)")