Code
datasets %>%
filter(code %in% list_main_datasets) %>%
mutate(html = paste0("[html](", code, '.html)')) %>%
{if (is_html_output()) print_table(.) else .}| code | name | html |
|---|---|---|
| NA | NA | NA |
| :----: | :----: | :----: |
Data
datasets %>%
filter(code %in% list_main_datasets) %>%
mutate(html = paste0("[html](", code, '.html)')) %>%
{if (is_html_output()) print_table(.) else .}| code | name | html |
|---|---|---|
| NA | NA | NA |
| :----: | :----: | :----: |