Deaths by week, sex and NUTS 3 region - demo_r_mwk3_t

Data - Eurostat

Info

Last observation: 2026-W31 (N = 35)

First observation: 2000-W01 (N = 659)

Last data update: 15 aoû 2026, 23:11. Last compile: 18 aoû 2026, 00:09

Structure

Weekly Deaths: France

National Total

Code
demo_r_mwk3_t |>
  filter(geo == "FR",
         !is.na(values)) |>
  mutate(year = as.numeric(substr(time, 1, 4)),
         week = as.numeric(substr(time, 7, 8)),
         date = as.Date(paste0(year, "-01-01")) + (week - 1) * 7) |>
  ggplot() + geom_line(aes(x = date, y = values)) +
  theme_minimal() +
  scale_x_date(breaks = as.Date(paste0(seq(2013, 2100, 2), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("Weekly deaths (number)")

Paris vs. Nord

Code
demo_r_mwk3_t |>
  filter(geo %in% c("FR101", "FRE11"),
         !is.na(values)) |>
  mutate(year = as.numeric(substr(time, 1, 4)),
         week = as.numeric(substr(time, 7, 8)),
         date = as.Date(paste0(year, "-01-01")) + (week - 1) * 7) |>
  filter(date >= as.Date("2018-01-01")) |>
  left_join(colors, by = c("Geo" = "country")) |>
  ggplot() + geom_line(aes(x = date, y = values, color = color)) +
  scale_color_identity() + add_flags +
  theme_minimal() +
  theme(legend.position = c(0.2, 0.85),
        legend.title = element_blank()) +
  scale_x_date(breaks = as.Date(paste0(seq(2013, 2100, 1), "-01-01")),
               labels = date_format("%Y")) +
  xlab("") + ylab("Weekly deaths, NUTS 3 region (number)")

Latest Week: Largest NUTS 3 Regions

Code
latest_w <- demo_r_mwk3_t |>
  filter(nchar(geo) == 5, !is.na(values)) |>
  summarise(m = max(time)) |>
  pull(m)

demo_r_mwk3_t |>
  filter(time == latest_w,
         nchar(geo) == 5,
         !is.na(values)) |>
  select(Geo, values) |>
  arrange(desc(values)) |>
  head(15) |>
  print_table_conditional()
Geo values
Bern / Berne 166
CH040 Zürich 151
Vaud 88
Aargau 78
CH070 Ticino 63
Valais / Wallis 58
Genève 53
St. Gallen 52
Solothurn 46
Fribourg / Freiburg 42
Luzern 41
Thurgau 33
Graubünden / Grigioni / Grischun 32
Neuchâtel 30
Basel-Stadt 29

Death 2020W37

Code
demo_r_mwk3_t |>
  filter(time == "2020W37") |>
  
  select(geo, Geo, values) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

Death 2020W36

Code
demo_r_mwk3_t |>
  filter(time == "2020W36") |>
  
  select(geo, Geo, values) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}