Code
su.area %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}
Data - BLS
Last observation: 2026 (N = 203)
First observation: 1999 (N = 29)
Last data update: 05 sept. 2026, 23:12
Last compile: 05 sept. 2026, 23:17
su.area %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}su.seasonal %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}su.series %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}