Monthly unemployment rates

Data - OECD

Info

source dataset Title .html .rData
oecd IALFS_UNE_M Monthly unemployment rates 2026-03-23 2026-03-31

Last

obsTime Nobs
2026-02 574

REF_AREA

Code
IALFS_UNE_M %>%
  left_join(REF_AREA, by = "REF_AREA") %>%
  group_by(REF_AREA, Ref_area) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()

MEASURE

Code
IALFS_UNE_M %>%
  group_by(MEASURE) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()
MEASURE Nobs
UNE_LF_M 454058

ADJUSTMENT

Code
metadata_load("ADJUSTMENT", "CL_ADJUSTMENT")
IALFS_UNE_M %>%
  left_join(ADJUSTMENT, by = "ADJUSTMENT") %>%
  group_by(ADJUSTMENT, Adjustment) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()
ADJUSTMENT Adjustment Nobs
Y Calendar and seasonally adjusted 229629
N Neither seasonally adjusted nor calendar adjusted 224429

FREQ

Code
metadata_load("FREQ", "CL_FREQ")
IALFS_UNE_M %>%
  left_join(FREQ, by = "FREQ") %>%
  group_by(FREQ, Freq) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()
FREQ Freq Nobs
M Monthly 317036
Q Quarterly 109912
A Annual 27110

AGE

Code
metadata_load("AGE", "CL_AGE")
IALFS_UNE_M %>%
  left_join(AGE, by = "AGE") %>%
  group_by(AGE, Age) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()
AGE Age Nobs
Y_GE15 15 years or over 158998
Y15T24 From 15 to 24 years 147991
Y_GE25 25 years or over 147069

SEX

Code
metadata_load("SEX", "CL_SEX")
IALFS_UNE_M %>%
  left_join(SEX, by = "SEX") %>%
  group_by(SEX, Sex) %>%
  summarise(Nobs = n()) %>%
  arrange(-Nobs) %>%
  print_table_conditional()
SEX Sex Nobs
_T Total 152071
M Male 151000
F Female 150987

U.S., Europe, France, Germany, Italy, Spain

1999-

Code
IALFS_UNE_M %>%
  filter(REF_AREA %in% c("USA", "EA20", "FRA", "DEU", "ESP", "ITA"),
         FREQ == "Q",
         SEX == "_T",
         ADJUSTMENT == "Y",
         AGE == "Y_GE15"
         ) %>%
  quarter_to_date %>%
  left_join(REF_AREA, by = "REF_AREA") %>%
  filter(date >= as.Date("1999-01-01")) %>%
  ggplot(.) + theme_minimal() + xlab("") + ylab("PIB par habitant (1999T1 = 100)") +
  geom_line(aes(x = date, y = obsValue, color = Ref_area)) +
  scale_x_date(breaks = c(seq(1999, 2100, 2)) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y"))

U.S., Europe, Italy

1995-

Code
IALFS_UNE_M %>%
  filter(REF_AREA %in% c("USA", "EA20", "FRA", "ITA"),
         FREQ == "Q",
         SEX == "_T",
         ADJUSTMENT == "Y",
         AGE == "Y_GE15"
         ) %>%
  quarter_to_date %>%
  left_join(REF_AREA, by = "REF_AREA") %>%
  filter(date >= as.Date("1999-01-01")) %>%
  ggplot(.) + theme_minimal() + xlab("") + ylab("PIB par habitant (1999T1 = 100)") +
  geom_line(aes(x = date, y = obsValue, color = Ref_area)) +
  scale_x_date(breaks = c(seq(1999, 2100, 2)) %>% paste0("-01-01") %>% as.Date,
               labels = date_format("%Y"))