Code
BSP %>%
left_join(BS_ITEM, by = "BS_ITEM") %>%
group_by(BS_ITEM, Bs_item) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
{if (is_html_output()) print_table(.) else .}| BS_ITEM | Bs_item | Nobs |
|---|---|---|
| L21 | Overnight deposits | 517357 |
| LE0 | Electronic money - Total | 2978 |
| A2G | Intra-day loans (assets) | 1823 |
| A2H | Loans other than intraday (A20 - A2G) | 1479 |
| A10 | Cash | 1050 |
| L10 | Currency in circulation | 1050 |