Last data update: 21 sept. 2026, 16:00
Last compile: 21 sept. 2026, 16:03
Structure
Nomenclature internationale SHA (System of Health Accounts, OCDE/Eurostat/OMS) : hc = fonction de soins, hp = prestataire, hf = financeur. TOTAL désigne l’agrégat toutes catégories.
Répartition de la CSBM par fonction de soins (HC)
Code
`cns-sha` |>
filter(hc %in% names(hc_labels), hp == "TOTAL", hf == "TOTAL", annee == max(annee)) |>
mutate(hc_lib = recode(hc, !!!hc_labels)) |>
ggplot() + geom_col(aes(x = reorder(hc_lib, valeur), y = valeur)) +
coord_flip() +
theme_minimal() + xlab("") + ylab(paste("Millions d'euros,", max(`cns-sha`$annee))) +
scale_y_continuous(labels = comma_format(big.mark = " "))
Répartition de la CSBM par prestataire (HP)
Code
`cns-sha` |>
filter(hp %in% names(hp_labels), hc == "TOTAL", hf == "TOTAL", annee == max(annee)) |>
mutate(hp_lib = recode(hp, !!!hp_labels)) |>
ggplot() + geom_col(aes(x = reorder(hp_lib, valeur), y = valeur)) +
coord_flip() +
theme_minimal() + xlab("") + ylab(paste("Millions d'euros,", max(`cns-sha`$annee))) +
scale_y_continuous(labels = comma_format(big.mark = " "))
Répartition de la CSBM par financeur (HF)
Code
`cns-sha` |>
filter(hf %in% names(hf_labels), hc == "TOTAL", hp == "TOTAL", annee == max(annee)) |>
mutate(hf_lib = recode(hf, !!!hf_labels)) |>
ggplot() + geom_col(aes(x = reorder(hf_lib, valeur), y = valeur)) +
coord_flip() +
theme_minimal() + xlab("") + ylab(paste("Millions d'euros,", max(`cns-sha`$annee))) +
scale_y_continuous(labels = comma_format(big.mark = " "))
Évolution de la structure par fonction de soins
Code
`cns-sha` |>
filter(hc %in% names(hc_labels), hp == "TOTAL", hf == "TOTAL") |>
mutate(hc_lib = recode(hc, !!!hc_labels)) |>
ggplot() + geom_area(aes(x = annee, y = valeur, fill = hc_lib)) +
theme_minimal() + xlab("") + ylab("Millions d'euros") +
scale_x_continuous(breaks = scales::pretty_breaks()) +
scale_y_continuous(labels = comma_format(big.mark = " ")) +
scale_fill_viridis_d() +
theme(legend.position = "bottom", legend.title = element_blank())