Bilan démographique - flux migratoires et caractéristiques des entrants en 2019 - ip1849

Données - INSEE

Flux migratoires, 2006-2019

Code
ip1849_fig2c |>
  mutate(variable = recode(variable, entrees = "Entrées", sorties = "Sorties", solde_migratoire = "Solde migratoire")) |>
  ggplot() + geom_line(aes(x = annee, y = value, color = variable), linewidth = 1) +
  theme_minimal() + xlab("") + ylab("Milliers de personnes") +
  theme(legend.title = element_blank()) +
  geom_hline(yintercept = 0, linetype = "dashed") +
  scale_color_viridis_d()

Origine des personnes entrées en France en 2019

Code
ip1849_fig4 |>
  filter(indicateur == "Nombres d’entrées en 2019", origine %in% c("Afrique", "Europe", "Asie", "Amerique_Oceanie")) |>
  mutate(origine = fct_reorder(origine, value)) |>
  ggplot() + geom_col(aes(x = origine, y = value, fill = value), show.legend = F) +
  coord_flip() +
  theme_minimal() + xlab("") + ylab("Nombre d'entrées en 2019 (milliers)") +
  scale_fill_viridis_c()

Caractéristiques par origine (immigrés vs non-immigrés)

Code
ip1849_fig4 |>
  filter(indicateur %in% c("Femmes", "Moins de 18 ans", "En emploi", "Diplômé du supérieur"),
         origine %in% c("Ensemble_immigres", "Ensemble_non_immigres")) |>
  mutate(origine = recode(origine, Ensemble_immigres = "Immigrés", Ensemble_non_immigres = "Non-immigrés")) |>
  ggplot() + geom_col(aes(x = indicateur, y = value, fill = origine), position = position_dodge()) +
  coord_flip() +
  theme_minimal() + xlab("") + ylab("Part parmi les entrants en 2019 (%)") +
  theme(legend.title = element_blank()) +
  scale_fill_viridis_d()