Monthly International Merchandise Trade (IMTS) – Headline Series - MEI_TRD

Data - OECD

~/data/oecd/

Info

LAST_DOWNLOAD

LAST_DOWNLOAD
2022-12-03

LAST_COMPILE

LAST_COMPILE
2024-04-16

Last, Monthly

obsTime	Nobs
2022-10	180

Last, Quarterly

obsTime	Nobs
2022-Q3	792

Nobs - Javascript

MEI_TRD %>%
  left_join(MEI_TRD_var$SUBJECT, by = c("SUBJECT")) %>%
  {if (!is_html_output()) mutate(., Subject = substr(Subject, 1, 87)) else .} %>%
  group_by(SUBJECT, Subject, FREQUENCY) %>%
  filter(!is.na(obsValue)) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  {if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}

SUBJECT

MEI_TRD %>%
  left_join(MEI_TRD_var$SUBJECT, by = c("SUBJECT")) %>%
  group_by(SUBJECT, Subject) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()

SUBJECT	Subject	Nobs
XTEXVA01	Exports in goods (value)	250219
XTIMVA01	Imports in goods (value)	248711
XTNTVA01	Net trade in goods (value)	165472

LOCATION

MEI_TRD %>%
  left_join(MEI_TRD_var$LOCATION, by = "LOCATION") %>%
  group_by(LOCATION, Location) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  mutate(Flag = gsub(" ", "-", str_to_lower(gsub(" ", "-", Location))),
         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 .}

FREQUENCY

MEI_TRD %>%
  left_join(MEI_TRD_var$FREQUENCY, by = c("FREQUENCY")) %>%
  group_by(FREQUENCY, Frequency) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()

FREQUENCY	Frequency	Nobs
M	Monthly	467691
Q	Quarterly	157583
A	Annual	39128

obsTime

MEI_TRD %>%
  group_by(obsTime) %>%
  summarise(Nobs = n()) %>%
  arrange(desc(obsTime)) %>%
  print_table_conditional()