Last data update: 21 sept. 2026, 16:15
Last compile: 21 sept. 2026, 16:21
`les-risques-psychosociaux` |>
filter(axe == "Quantité", categorie %in% c("Agriculteurs", "Ouvriers", "Employés",
"Professions intermédiaires",
"Cadres et professions intellectuelles supérieures")) |>
ggplot(aes(x = categorie, y = value / 100)) +
geom_col(fill = "#2A5DB0") +
coord_flip() +
theme_minimal() + xlab("") + ylab("") +
scale_y_continuous(labels = percent_format(accuracy = 1))