Bundesbank - BUBA

Data

Main Datasets

Javascript

datasets %>%
  filter(code %in% list_main_datasets) %>%
    mutate(html = paste0('<a  target=_blank href=', code, '.html > html </a>')) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F, escape = F) else .}

Flat

datasets %>%
  filter(code %in% list_main_datasets) %>%
  mutate(html = paste0("[html](", code, '.html)')) %>%
  {if (is_html_output()) print_table(.) else .}

code	name	Nobs	html
BBASV	Deutsche Bundesbank, Statistics on Pension funds	147918	[html]

Other Datasets

Javascript

datasets %>%
  filter(!(code %in% list_main_datasets)) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F, escape = F) else .}