National Accounts, Expenditure, Gross Domestic Product, Nominal, Domestic Currency

Data - IMF - IFS

FREQ

Code
NGDP_XDC %>%
  group_by(FREQ) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()
FREQ Nobs
A 5942

REF_AREA

Code
NGDP_XDC %>%
  left_join(REF_AREA, by = "REF_AREA") %>%
  group_by(REF_AREA, Ref_area, FREQ) %>%
  summarise(Nobs = n(),
            min = first(TIME_PERIOD),
            max = last(TIME_PERIOD)) %>%
  arrange(-Nobs) %>%
  mutate(Flag = gsub(" ", "-", str_to_lower(gsub(" ", "-", Ref_area))),
         Flag = paste0('<img src="../../icon/flag/vsmall/', Flag, '.png" alt="Flag">')) %>%
  select(Flag, everything()) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F, escape = F) else .}