Legally induced abortions by mother’s age - demo_fabort

Data - Eurostat

unit

demo_fabort %>%
  left_join(unit, by = "unit") %>%
  group_by(unit, Unit) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}

unit	Unit	Nobs
NR	Number	7847

age

demo_fabort %>%
  left_join(age, by = "age") %>%
  group_by(age, Age) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) print_table(.) else .}

age	Age	Nobs
TOTAL	Total	1222
Y15-19	From 15 to 19 years	710
Y20-24	From 20 to 24 years	706
UNK	Unknown	699
Y30-34	From 30 to 34 years	693
Y35-39	From 35 to 39 years	686
Y25-29	From 25 to 29 years	668
Y40-44	From 40 to 44 years	663
Y_LT15	Less than 15 years	645
Y45-49	From 45 to 49 years	641
Y_GE50	50 years or over	514

geo

demo_fabort %>%
  left_join(geo, by = "geo") %>%
  group_by(geo, Geo) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}