Quarterly benchmarked Unit Labour Cost indicators – By economic activity - ULC_QUA
Data - OECD
Last observation: Q3 2011 (N = 387) · 2010 (N = 1652)
First observation: 1947 (N = 4) · Q1 1947 (N = 4)
Last data update: 02 août 2026, 09:17
Last compile: 04 sept. 2026, 03:12
Structure
Nobs - Javascript
Code
ULC_QUA |>
left_join(ULC_QUA_var$SUBJECT |>
setNames(c("SUBJECT", "Subject")), by = "SUBJECT") |>
left_join(ULC_QUA_var$SECTOR |>
setNames(c("SECTOR", "Sector")), by = "SECTOR") |>
group_by(SUBJECT, Subject, SECTOR, Sector, MEASURE, FREQUENCY) |>
summarise(Nobs = n()) |>
arrange(-Nobs) %>%
{if (is_html_output()) datatable(., filter = 'top', rownames = F) else .}Unit Labour Cost
2000-
Code
ULC_QUA |>
filter(SUBJECT == "ULQBBU99",
SECTOR == "01",
MEASURE == "IXOB",
LOCATION %in% c("FRA", "DEU", "ITA", "GRC", "ESP")) |>
left_join(ULC_QUA_var$LOCATION |>
setNames(c("LOCATION", "Location")), by = "LOCATION") |>
year_to_date() |>
filter(date >= as.Date("2000-01-01")) |>
group_by(Location) |>
mutate(obsValue = 100*obsValue / obsValue[date == as.Date("2000-01-01")]) |>
ggplot() + theme_minimal() + ylab("Unit Labour Costs") + xlab("") +
geom_line(aes(x = date, y = obsValue, color = Location)) +
scale_color_manual(values = viridis(6)[1:5]) +
theme(legend.position = c(0.15, 0.8),
legend.title = element_blank()) +
scale_x_date(breaks = seq(1920, 2100, 1) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0, 200, 10))
1995-
Code
ULC_QUA |>
filter(SUBJECT == "ULQBBU99",
SECTOR == "01",
MEASURE == "IXOBTE",
FREQUENCY == "Q",
LOCATION %in% c("FRA", "DEU", "ITA", "GRC", "ESP")) |>
left_join(ULC_QUA_var$LOCATION |>
setNames(c("LOCATION", "Location")), by = "LOCATION") |>
quarter_to_date() |>
filter(date >= as.Date("1995-01-01")) |>
group_by(Location) |>
mutate(obsValue = 100*obsValue / obsValue[date == as.Date("2000-01-01")]) |>
ggplot() + theme_minimal() + ylab("Unit Labour Costs") + xlab("") +
geom_line(aes(x = date, y = obsValue, color = Location)) +
scale_color_manual(values = viridis(6)[1:5]) +
theme(legend.position = c(0.15, 0.8),
legend.title = element_blank()) +
scale_x_date(breaks = seq(1920, 2100, 1) |> paste0("-01-01") |> as.Date(),
labels = date_format("%Y")) +
scale_y_log10(breaks = seq(0, 200, 10))



