Last observation: juil. 2026 (N = 1)
First observation: janv. 2000 (N = 1)
Last data update: 20 sept. 2026, 21:00
Last compile: 20 sept. 2026, 21:00
`emploi-interimaire` |>
ggplot(aes(x = date, y = value / 1000)) +
geom_line(color = "#2A5DB0") +
theme_minimal() + xlab("") + ylab("milliers d'intérimaires") +
scale_x_date(date_breaks = "2 years", labels = date_format("%Y")) +
theme(axis.text.x = element_text(angle = 45, vjust = 1, hjust = 1))
`emploi-interimaire-secteur` |>
filter(unite == "effectif",
secteur %in% c("C3", "C4", "C5", "FZ", "GZ", "HZ"),
date >= as.Date("2015-01-01")) |>
ggplot(aes(x = date, y = value / 1000, color = `Libellé`)) +
geom_line() +
theme_minimal() + xlab("") + ylab("milliers d'intérimaires") +
scale_x_date(date_breaks = "1 year", labels = date_format("%Y")) +
theme(legend.position = "bottom", legend.title = element_blank(),
axis.text.x = element_text(angle = 45, vjust = 1, hjust = 1)) +
guides(color = guide_legend(nrow = 3))
`emploi-interimaire-secteur` |>
filter(unite == "ETP",
secteur %in% c("C3", "C4", "C5", "FZ", "GZ", "HZ"),
date >= as.Date("2015-01-01")) |>
ggplot(aes(x = date, y = value / 1000, color = `Libellé`)) +
geom_line() +
theme_minimal() + xlab("") + ylab("milliers d'ETP") +
scale_x_date(date_breaks = "1 year", labels = date_format("%Y")) +
theme(legend.position = "bottom", legend.title = element_blank(),
axis.text.x = element_text(angle = 45, vjust = 1, hjust = 1)) +
guides(color = guide_legend(nrow = 3))