Last observation: févr. 2020 (N = 1)
First observation: déc. 1790 (N = 1)
Last data update: 15 sept. 2026, 00:14
Last compile: 15 sept. 2026, 00:17
trade_info |>
select(Ticker, Name, Country) |>
right_join(trade |>
group_by(Ticker) |>
summarise(Nobs = n(),
start = first(year(date)),
end = last(year(date))), by = "Ticker") |>
arrange(-Nobs) |>
mutate(Flag = gsub(" ", "-", str_to_lower(Country)),
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 .}trade_info |>
select(Ticker, Name, Currency, Metadata, Flow) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}trade |>
bind_rows(gdp) |>
filter(iso3c == "FRA",
month(date) == 12) |>
select(variable, date, value) |>
spread(variable, value) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}