Deaths by week, sex and NUTS 3 region - demo_r_mwk3_t

Data - Eurostat

Info

Last observation: NA: 2026-W28 (N = 147)

First observation: NA: 2000-W01 (N = 659)

Last data update: 31 jul 2026, 09:13. Last compile: 01 aoû 2026, 22:18

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
Nord 364
Bouches-du-Rhône 330
Paris 305
Gironde 290
Loire-Atlantique 259
Hérault 256
Rhône 255
Pas-de-Calais 227
Alpes-Maritimes 219
Haute-Garonne 208
Seine-Maritime 206
Var 205
Finistère 199
Moselle 195
Isère 187

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 .}