Last data update: 29 sept. 2026, 17:27
Last compile: 29 sept. 2026, 17:28
`FT5.3-SL_Montant_pensions_FP` |>
filter(mesure == "Montant moyen des pensions entrées en paiement (flux, par effectif)",
indicateur == "Montant mensuel moyen de la retraite totale de droit direct (en euros)",
sous_regime %in% c("Pensions civiles hors La Poste et Orange", "Pensions militaires") |
regime == "CNRACL (fonction publique territoriale et hospitalière)") |>
mutate(serie = if_else(regime == "SRE (fonction publique de l'État)", paste("SRE -", sous_regime),
paste(regime, "-", sous_regime))) |>
ggplot(aes(x = annee, y = valeur, color = serie)) +
geom_line(linewidth = 1) +
scale_color_brewer(palette = "Set1", name = NULL) +
theme_minimal(base_size = 9) +
labs(x = NULL, y = "€ par mois",
title = "Montant mensuel moyen de la pension de droit direct",
subtitle = "pensions entrées en paiement dans l'année (flux)") +
theme(legend.position = "bottom", panel.grid.minor = element_blank()) +
guides(color = guide_legend(ncol = 1))
`FT5.3-SL_Montant_pensions_FP` |>
filter(mesure == "Montant moyen des pensions entrées en paiement (flux, par effectif)",
indicateur %in% c("Hommes", "Femmes"),
regime == "SRE (fonction publique de l'État)",
sous_regime == "Pensions civiles hors La Poste et Orange") |>
ggplot(aes(x = annee, y = valeur, color = indicateur)) +
geom_line(linewidth = 1) +
scale_color_manual(values = c("Hommes" = "#1B3F8B", "Femmes" = "#E8737A"), name = NULL) +
theme_minimal(base_size = 11) +
labs(x = NULL, y = "€ par mois",
title = "Pension moyenne de droit direct selon le sexe",
subtitle = "SRE, pensions civiles hors La Poste et Orange, flux") +
theme(legend.position = "bottom", panel.grid.minor = element_blank())
`FT5.3-SL_Montant_pensions_FP` |>
filter(mesure == "Pension moyenne, indice et taux de liquidation (flux)",
indicateur == "Taux de liquidation (en %)",
regime == "SRE (fonction publique de l'État)",
sous_regime == "Pensions civiles hors La Poste et Orange") |>
ggplot(aes(x = annee, y = valeur / 100)) +
geom_line(linewidth = 1, color = "#1B3F8B") +
scale_y_continuous(labels = scales::percent_format(accuracy = 1)) +
theme_minimal(base_size = 12) +
labs(x = NULL, y = NULL,
title = "Taux de liquidation moyen des pensions civiles de l'État",
subtitle = "flux, pensions civiles hors La Poste et Orange") +
theme(panel.grid.minor = element_blank())
`FT5.3-SL_Montant_pensions_FP` |>
filter(mesure == "Montant moyen des pensions versées (stock, par effectif)",
indicateur == "Montant mensuel moyen de la retraite totale de droit direct (en euros)",
sous_regime %in% c("Pensions civiles hors La Poste et Orange", "Pensions militaires") |
regime == "CNRACL (fonction publique territoriale et hospitalière)") |>
mutate(serie = if_else(regime == "SRE (fonction publique de l'État)", paste("SRE -", sous_regime),
paste(regime, "-", sous_regime))) |>
ggplot(aes(x = annee, y = valeur, color = serie)) +
geom_line(linewidth = 1) +
scale_color_brewer(palette = "Set1", name = NULL) +
theme_minimal(base_size = 9) +
labs(x = NULL, y = "€ par mois",
title = "Montant mensuel moyen de la pension de droit direct",
subtitle = "ensemble des pensions versées dans l'année (stock)") +
theme(legend.position = "bottom", panel.grid.minor = element_blank()) +
guides(color = guide_legend(ncol = 1))