Last observation: 2 oct. 2026 (N = 26) · 30 sept. 2026 (N = 26) · 31 déc. 2025 (N = 26)
First observation: 4 janv. 1971 (N = 10) · 31 janv. 1971 (N = 11) · 31 déc. 1971 (N = 11)
Last data update: 06 oct. 2026, 23:33
Last compile: 06 oct. 2026, 23:35
H10 |>
group_by(SERIES_NAME, CURRENCY, FX, UNIT) |>
summarise(Nobs = n()) |>
left_join(H10_var$CURRENCY |> rename(CURRENCY = id), by = "CURRENCY") |>
select(-description.default) |>
arrange(-Nobs) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}H10_struct_concepts %>%
{if (is_html_output()) print_table(.) else .}| id | Name.default |
|---|---|
| OBS_STATUS | Observation status |
| UNIT_MULT | Unit multiplier |
| TIME_PERIOD | Time |
| UNIT | Units |
| FX | Country or Index type |
| OBS_VALUE | Observation value |
| FREQ | Frequency |
| SERIES_NAME | Series Name |
| CURRENCY | Currency |
H10_var$UNIT_MULT %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}H10 |>
group_by(OBS_STATUS) |>
summarise(Nobs = n()) |>
print_table_conditional()| OBS_STATUS | Nobs |
|---|---|
| A | 332789 |
| ND | 14771 |
H10 |>
group_by(CURRENCY) |>
summarise(Nobs = n()) |>
left_join(H10_var$CURRENCY |> rename(CURRENCY = id), by = "CURRENCY") |>
select(-description.default) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}H10 |>
filter(SERIES_NAME == "RXI$US_N.B.EU",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 1) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.5, 6, 0.1),
labels = dollar_format(accuracy = 0.1, suffix = " $/€", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI$US_N.B.EU",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
filter(TIME_PERIOD >= as.Date("2010-01-01")) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 1) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.5, 6, 0.02),
labels = dollar_format(accuracy = 0.01, suffix = "/€"))
H10 |>
filter(SERIES_NAME == "RXI$US_N.B.EU",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
filter(TIME_PERIOD >= as.Date("2015-01-01")) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 1) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.5, 6, 0.02),
labels = dollar_format(accuracy = 0.01, suffix = "/€"))
H10 |>
filter(SERIES_NAME == "RXI$US_N.M.EU",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 1) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.5, 6, 0.1),
labels = dollar_format(accuracy = 0.1, suffix = " $/€", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI$US_N.A.EU",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 1) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.5, 6, 0.1),
labels = dollar_format(accuracy = 0.1, suffix = " $/€", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI$US_N.B.UK",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.5, 6, 0.1),
labels = dollar_format(accuracy = 0.1, suffix = " $/£", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI$US_N.M.UK",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.5, 6, 0.1),
labels = dollar_format(accuracy = 0.1, suffix = " $/£", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI$US_N.A.UK",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.5, 6, 0.1),
labels = dollar_format(accuracy = 0.1, suffix = " $/£", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.B.JA",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(40, 500, 20),
labels = dollar_format(accuracy = 1, suffix = " ¥/$", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.M.JA",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(40, 500, 20),
labels = dollar_format(accuracy = 1, suffix = " ¥/$", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.A.JA",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(40, 500, 20),
labels = dollar_format(accuracy = 1, suffix = " ¥/$", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.B.SZ",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.5, 6, 0.5),
labels = dollar_format(accuracy = 0.1, suffix = " CHF/$", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.M.SZ",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.5, 6, 0.5),
labels = dollar_format(accuracy = 0.1, suffix = " CHF/$", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.A.SZ",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.5, 6, 0.5),
labels = dollar_format(accuracy = 0.1, suffix = " CHF/$", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.B.DN",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(3, 13, 1),
labels = dollar_format(accuracy = 1, suffix = " kr/$", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.M.DN",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(3, 13, 1),
labels = dollar_format(accuracy = 1, suffix = " kr/$", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.A.DN",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(3, 13, 1),
labels = dollar_format(accuracy = 1, suffix = " kr/$", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.B.CA",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.8, 2, 0.1),
labels = dollar_format(accuracy = 0.1, suffix = " C$/$", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.M.CA",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.8, 2, 0.1),
labels = dollar_format(accuracy = 0.1, suffix = " C$/$", prefix = ""))
H10 |>
filter(SERIES_NAME == "RXI_N.A.CA",
OBS_STATUS == "A") |>
arrange(TIME_PERIOD) |>
ggplot() + geom_line(aes(x = TIME_PERIOD, y = OBS_VALUE)) +
theme_minimal() + xlab("") + ylab("") +
scale_x_date(breaks = seq(1960, 2100, 5) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0.8, 2, 0.1),
labels = dollar_format(accuracy = 0.1, suffix = " C$/$", prefix = ""))