Last data update: 28 sept. 2026, 22:46
Last compile: 28 sept. 2026, 22:47
Part du budget des ménages consacrée à l’énergie (logement + transport) en 2006.
ip1315_part_budget_2006 |>
filter(dimension == "Milieu d'habitation", poste != "Ensemble") |>
mutate(categorie = fct_reorder(categorie, value, .fun = sum)) |>
ggplot() + geom_col(aes(x = categorie, y = value, fill = poste)) +
coord_flip() +
theme_minimal() + xlab("") + ylab("Part du budget (%)") +
theme(legend.title = element_blank()) +
scale_fill_viridis_d()
ip1315_part_budget_2006 |>
filter(dimension == "Quintile de niveau de vie", poste != "Ensemble") |>
mutate(categorie = factor(categorie, levels = c("Q1 (les 20% des ménages les plus pauvres)", "Q2", "Q3", "Q4", "Q5 (les 20% des ménages les plus aisés)"))) |>
ggplot() + geom_col(aes(x = categorie, y = value, fill = poste)) +
coord_flip() +
theme_minimal() + xlab("") + ylab("Part du budget (%)") +
theme(legend.title = element_blank()) +
scale_fill_viridis_d()