Code
load_data("bis/CBS.RData")
Data - BIS
load_data("bis/CBS.RData")
%>%
CBS arrange(iso3c, date) %>%
group_by(iso3c, iso2c, `Reporting country`) %>%
summarise(Nobs = n(),
start = first(date),
end = last(date)) %>%
arrange(-Nobs) %>%
if (is_html_output()) datatable(., filter = 'top', rownames = F) else .} {
%>%
CBS group_by(FREQ, Frequency) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
FREQ | Frequency | Nobs |
---|---|---|
Q | Quarterly | 4829878 |
%>%
CBS group_by(CBS_BANK_TYPE, `CBS bank type`) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
CBS_BANK_TYPE | CBS bank type | Nobs |
---|---|---|
4B | Domestic banks | 1926648 |
4R | Domestic banks(4B), excl. domestic positions | 1911098 |
4O | All excluding 4C banks, excl. domestic positions (= 4R + 4Q +4V) | 652846 |
4N | All including 4C banks, excl. domestic positions (=4O + 4C) | 280153 |
4C | Inside-area foreign banks consolidated by their parent | 54896 |
4M | All banks (=4B +4C + 4D +4E) | 4237 |
%>%
CBS group_by(CBS_BASIS, `CBS reporting basis`) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
CBS_BASIS | CBS reporting basis | Nobs |
---|---|---|
F | Immediate counterparty basis | 2727608 |
U | Guarantor basis | 1525029 |
Q | Net risk transfers (Inward - Outward) | 355681 |
O | Outward risk transfers | 221560 |
%>%
CBS group_by(L_POSITION, `Balance sheet position`) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
L_POSITION | Balance sheet position | Nobs |
---|---|---|
C | Total claims | 2387754 |
I | International claims | 1737088 |
B | Local claims | 248343 |
X | Credit commitments | 172282 |
W | Guarantees extended | 162474 |
M | Local liabilities | 80436 |
D | Cross-border claims | 33282 |
L | Total liabilities | 5488 |
F | Total assets (financial and non-financial) | 1426 |
K | Capital / equity | 1305 |
%>%
CBS group_by(L_INSTR, `Type of instruments`) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
L_INSTR | Type of instruments | Nobs |
---|---|---|
A | All instruments | 4696898 |
V | Derivatives | 130279 |
D | Debt securities | 1354 |
G | Loans and deposits | 1347 |