Last observation: 2021 (N = 1170)
First observation: 2000 (N = 1170)
Last data update: 14 sept. 2026, 23:11
Last compile: 16 sept. 2026, 20:57
`TCRED-CONSTRUCTION-LOCAUX` |>
filter(INDICATEUR == "SURFACES_LOCAUX_AUTO_ARTISANAT",
REF_AREA %in% c("D92", "D93", "D94")) |>
year_to_date() |>
ggplot() + geom_line(aes(x = date, y = OBS_VALUE, color = REF_AREA, linetype = REF_AREA)) +
xlab("") + ylab("") + theme_minimal() +
scale_x_date(breaks = seq(1960, 2100, 1) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_color_manual(values = viridis(5)[1:4]) +
theme(legend.position = c(0.8, 0.9),
legend.title = element_blank())