Code
%>%
prc_hpi_ooinw left_join(expend, by = "expend") %>%
group_by(expend, Expend) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
if (is_html_output()) print_table(.) else .} {
expend | Expend | Nobs |
---|---|---|
DW_ACQ | Acquisitions of dwellings | 551 |
DW_ACQ_NEW | New dwellings | 551 |
DW_ACQ_OTH | Other services related to the acquisition of dwellings | 551 |
TOTAL | Total | 550 |
DW_OWN | Ownership of dwellings | 549 |
DW_OWN_RMNT | Major repairs and maintenance | 549 |
DW_OWN_INS | Insurance connected with dwellings | 548 |
DW_ACQ_NEWP | Purchases of newly built dwellings | 545 |
DW_ACQ_NEWSB | Self-build dwellings and major renovations | 542 |
DW_OWN_OTH | Other services related to ownership of dwellings | 542 |
DW_ACQ_EXST | Existing dwellings new to the households | 541 |