Exchange Rates - TRADHIST_EXCHANGE_RATES

Données - CEPII

Last data update: 14 sept. 2026, 23:58

Last compile: 15 sept. 2026, 00:02

countrycode

Ex 1: Pounds / Franc

TRADHIST_EXCHANGE_RATES |>
  select(year, value = XCHtoGBR, variable = iso) |>
  filter(variable == "FRA") |>
  ggplot() + geom_line(aes(x = year, y = value)) + 
  theme_minimal() + xlab("") + ylab("")

Ex 2: Pounds / Franc

TRADHIST_EXCHANGE_RATES |>
  select(year, value = XCHtoGBR, variable = iso) |>
  filter(variable == "FRA",
         year >= 1960) |>
  ggplot() + geom_line(aes(x = year, y = value)) + 
  theme_minimal() + xlab("") + ylab("")

Ex 3: Francs in Marks (1950-)

TRADHIST_EXCHANGE_RATES |>
  select(year, value = XCHtoGBR, variable = iso) |>
  filter(variable %in% c("FRA", "DEU")) |>
  spread(variable, value) |>
  mutate(ERate = FRA / DEU) |>
  filter(year >= 1950) |>
  ggplot() + geom_line(aes(x = year, y = ERate)) + 
  theme_minimal() + xlab("") + ylab("")

Ex 4: UK/FRA

September 19, 1931, speculative attacks on the pound forced Britain to abandon the gold standard

TRADHIST_EXCHANGE_RATES |>
  select(year, value = XCHtoGBR, variable = iso) |>
  filter(variable == "FRA") |>
  ggplot() + geom_line(aes(x = year, y = value)) + 
  theme_minimal() + xlab("") + ylab("")