Monthly unemployment rates

Data - OECD

Author

François Geerolf

Info

source dataset Title .html .rData
oecd IALFS_UNE_M Monthly unemployment rates 2026-02-10 2026-02-10

Last

obsTime Nobs
2026-01 54

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 450036

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 225798
N Neither seasonally adjusted nor calendar adjusted 224238

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 312951
Q Quarterly 109803
A Annual 27282

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 158156
Y_GE25 25 years or over 146140
Y15T24 From 15 to 24 years 145740

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 152204
M Male 148922
F Female 148910

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"))