Unemployment by sex, age and metropolitan regions - met_lfu3pers

Data - Eurostat

unit

Code
met_lfu3pers %>%
  left_join(unit, by = "unit") %>%
  group_by(unit, Unit) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}
unit Unit Nobs
THS_PER Thousand persons 84821

sex

Code
met_lfu3pers %>%
  left_join(sex, by = "sex") %>%
  group_by(sex, Sex) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}
sex Sex Nobs
T Total 28735
M Males 28107
F Females 27979

age

Code
met_lfu3pers %>%
  left_join(age, by = "age") %>%
  group_by(age, Age) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}
age Age Nobs
Y_GE15 15 years or over 20083
Y_GE25 25 years or over 19648
Y15-24 From 15 to 24 years 19166
Y20-64 From 20 to 64 years 13378
Y15-74 From 15 to 74 years 9253
Y15-29 From 15 to 29 years 3293

metroreg

Code
met_lfu3pers %>%
  left_join(metroreg, by = "metroreg") %>%
  group_by(metroreg, Metroreg) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}