Taux de chômage localisé par zone d’emploi - chomage-zone

Données - INSEE

Dernière année disponible, par zone d’emploi

Code
`chomage-zone` |>
  filter(annee == max(annee)) |>
  slice_max(value, n = 20) |>
  mutate(libelle_ze = fct_reorder(libelle_ze, value)) |>
  ggplot() + geom_col(aes(x = libelle_ze, y = value, fill = value), show.legend = F) +
  coord_flip() +
  theme_minimal() + xlab("") + ylab("Taux de chômage (%), dernière année disponible") +
  scale_fill_viridis_c(direction = -1)

Code
`chomage-zone` |>
  filter(annee == max(annee)) |>
  slice_min(value, n = 20) |>
  mutate(libelle_ze = fct_reorder(libelle_ze, value, .desc = TRUE)) |>
  ggplot() + geom_col(aes(x = libelle_ze, y = value, fill = value), show.legend = F) +
  coord_flip() +
  theme_minimal() + xlab("") + ylab("Taux de chômage (%), dernière année disponible") +
  scale_fill_viridis_c()

Distribution du taux de chômage entre zones d’emploi

Code
`chomage-zone` |>
  filter(annee %in% c(2003, 2010, 2020, max(annee))) |>
  mutate(annee = factor(annee)) |>
  ggplot() + geom_boxplot(aes(x = annee, y = value, fill = annee), show.legend = F) +
  theme_minimal() + xlab("") + ylab("Taux de chômage (%)") +
  scale_fill_viridis_d()

Évolution, quelques grandes zones

Code
`chomage-zone` |>
  filter(libelle_ze %in% c("Paris", "Lyon", "Marseille", "Toulouse", "Lille", "Bordeaux")) |>
  ggplot() + geom_line(aes(x = annee, y = value, color = libelle_ze), linewidth = 0.8) +
  theme_minimal() + xlab("") + ylab("Taux de chômage (%)") +
  theme(legend.title = element_blank()) +
  scale_color_viridis_d()