Code
mar_qg_qm_pvh %>%
left_join(unit, by = "unit") %>%
group_by(unit, Unit) %>%
summarise(Nobs = n()) %>%
arrange(-Nobs) %>%
{if (is_html_output()) print_table(.) else .}| unit | Unit | Nobs |
|---|---|---|
| THS_TEU | Thousand twenty-foot equivalent unit (TEU) | 648 |
| RT_PRE | Growth rate on previous period (t/t-1) | 639 |
| SUM_4Q | Sum of the last 4 quarters | 621 |
| RT4 | Growth rate on the same quarter in previous year | 612 |
| RT_R4Q | Rolling 4-quarter growth rate | 585 |