Last data update: 10 sept. 2026, 18:30
Last compile: 19 sept. 2026, 16:35
`procedures-collectives` |>
filter(!is.na(nombre_de_procedures_cvs)) |>
ggplot() + geom_line(aes(x = dernier_jour_du_trimestre, y = nombre_de_procedures_cvs,
color = nature_de_procedure)) +
theme_minimal() + xlab("") + ylab("Nombre de procédures (CVS)") +
scale_x_date(date_breaks = "2 years", labels = date_format("%Y")) +
scale_y_continuous(labels = label_number(big.mark = " ")) +
scale_color_viridis_d() +
theme(legend.position = "bottom", legend.title = element_blank(),
axis.text.x = element_text(angle = 45, vjust = 1, hjust = 1))