Last observation: 2026 (N = 22915)
First observation: 1996 (N = 7213)
Last data update: 14 aoû 2026, 22:01. Last compile: 18 aoû 2026, 03:30
Data - Eurostat
Last observation: 2026 (N = 22915)
First observation: 1996 (N = 7213)
Last data update: 14 aoû 2026, 22:01. Last compile: 18 aoû 2026, 03:30
prc_hicp_iw |>
filter(geo == "FR",
coicop18 %in% c("CP01", "CP04", "CP07")) |>
year_to_date() |>
mutate(values = values/1000) |>
ggplot() + geom_line(aes(x = date, y = values, color = Coicop18)) +
theme_minimal() +
scale_x_date(breaks = as.Date(paste0(seq(1995, 2100, 5), "-01-01")),
labels = date_format("%Y")) +
theme(legend.position = "right") +
xlab("") + ylab("Weight in HICP basket") +
scale_y_continuous(labels = scales::percent_format(accuracy = 1))
prc_hicp_iw |>
filter(geo %in% c("FR", "DE", "IT", "ES"),
coicop18 == "CP04") |>
year_to_date() |>
left_join(colors, by = c("Geo" = "country")) |>
mutate(values = values/1000) |>
ggplot() + geom_line(aes(x = date, y = values, color = color)) +
theme_minimal() + scale_color_identity() + add_flags +
scale_x_date(breaks = as.Date(paste0(seq(1995, 2100, 5), "-01-01")),
labels = date_format("%Y")) +
xlab("") + ylab("Housing, water, electricity, gas and other fuels (weight in HICP basket)") +
scale_y_continuous(labels = scales::percent_format(accuracy = 1))