Code
%>%
bop_euins6_a left_join(currency, by = "currency") %>%
group_by(currency, Currency) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
currency | Currency | Nobs |
---|---|---|
EUR | Euro | 5285110 |
Data - Eurostat
%>%
bop_euins6_a left_join(currency, by = "currency") %>%
group_by(currency, Currency) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
currency | Currency | Nobs |
---|---|---|
EUR | Euro | 5285110 |
%>%
bop_euins6_a left_join(bop_item, by = "bop_item") %>%
group_by(bop_item, Bop_item) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) datatable(., filter = 'top', rownames = F) else .} {
%>%
bop_euins6_a left_join(sector10, by = "sector10") %>%
group_by(sector10, Sector10) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
sector10 | Sector10 | Nobs |
---|---|---|
S1 | Total economy | 2972655 |
S13 | General Government | 2031391 |
S12M | Financial corporations other than MFIs | 281064 |
%>%
bop_euins6_a left_join(sectpart, by = "sectpart") %>%
group_by(sectpart, Sectpart) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
sectpart | Sectpart | Nobs |
---|---|---|
S1 | Total economy | 3588025 |
S13 | General Government | 1612242 |
S1P | Other sectors than MFIs and general government | 76513 |
S1W | Other sectors than General Government | 8330 |
%>%
bop_euins6_a left_join(stk_flow, by = "stk_flow") %>%
group_by(stk_flow, Stk_flow) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
stk_flow | Stk_flow | Nobs |
---|---|---|
BAL | Balance | 2067232 |
DEB | Debit | 1710298 |
CRE | Credit | 953843 |
ASS | Assets | 262142 |
NET | Net | 255502 |
LIAB | Liabilities | 36093 |
%>%
bop_euins6_a left_join(partner, by = "partner") %>%
group_by(partner, Partner) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) datatable(., filter = 'top', rownames = F) else .} {
%>%
bop_euins6_a left_join(geo, by = "geo") %>%
group_by(geo, Geo) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
geo | Geo | Nobs |
---|---|---|
EUI_X_EAI | EU institutions except the institutions of the euro area (aggregate changing according to the context) | 1781713 |
COMM | European Commission | 1443466 |
EU_BDG | All EU institutions financed via the EU Budget | 526631 |
EDF | European Development Fund | 320178 |
EIB | European Investment Bank (EIB) | 223893 |
PARL | European Parliament | 191873 |
CONS | Council of the European Union | 129325 |
EUB_OTH | Other EU institutions financed via the EU Budget | 127247 |
CURIA | Court of Justice of the European Union | 116112 |
ECA | European Court of Auditors | 110922 |
EIF | European Investment Fund | 80860 |
EESC | European Economic and Social Committee (EESC) | 62550 |
COR | European Committee of the Regions (CoR) | 59411 |
EUB_MNR | Other small EU institutions financed via the EU Budget | 53549 |
IF | Investment Facility | 37789 |
SRB | Single Resolution Board (SRB) | 13761 |
FEMIP | Facility for Euro-Mediterranean Investment and Partnership | 5830 |