Code
%>%
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 .} {
Data
%>%
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 .} {
%>%
datasets filter(code %in% list_main_datasets) %>%
mutate(html = paste0("[html](", code, '.html)')) %>%
if (is_html_output()) print_table(.) else .} {
code | name | html |
---|---|---|
MM23 | :Consumer price inflation time series | [html] |
RAGV | :Regional Gross Value Added | [html] |
UCST | :Unit labour cost and unit wage cost time series | [html] |
%>%
datasets filter(!(code %in% list_main_datasets)) %>%
if (is_html_output()) datatable(., filter = 'top', rownames = F, escape = F) else .} {