Emploi, chômage, revenus du travail - Edition 2025 - ECRT2025

Données - INSEE

Auteur

François Geerolf

Last observation: 2022 (N = 6)

First observation: 2000 (N = 1)

Last data update: 02 août 2026, 11:04

Last compile: 04 sept. 2026, 01:55

Source en ligne

Salaires de la fonction publique: html

variable

Code 
ECRT2025 |>
  group_by(variable) |>
  summarise(Nobs = n()) |>
  arrange(-Nobs) |>
  print_table_conditional()
variable Nobs
Ensemble 23
Ensemble des fonctionnaires 23
Fonctionnaires catégorie A 23
Fonctionnaires catégorie B 23
Fonctionnaires catégorie C 23
Non-fonctionnaires (hors personnels médicaux) 23

date

Code 
ECRT2025 |>
  group_by(date) |>
  summarise(Nobs = n()) |>
  arrange(-Nobs) |>
  print_table_conditional()
date Nobs
2000-01-01 6
2001-01-01 6
2002-01-01 6
2003-01-01 6
2004-01-01 6
2005-01-01 6
2006-01-01 6
2007-01-01 6
2008-01-01 6
2009-01-01 6
2010-01-01 6
2011-01-01 6
2012-01-01 6
2013-01-01 6
2014-01-01 6
2015-01-01 6
2016-01-01 6
2017-01-01 6
2018-01-01 6
2019-01-01 6
2020-01-01 6
2021-01-01 6
2022-01-01 6

F28

Tous

Euros

Code 
ECRT2025 |>
  filter(sheet == "F28",
         variable %in% c("Ensemble", "Ensemble des fonctionnaires")) |>
  mutate(value = as.numeric(value)) |>
  ggplot() + theme_minimal() + xlab("") + ylab("") +
  #scale_color_manual(values = viridis(8)[1:7]) +
  geom_line(aes(x = date, y = value, color = variable)) + 
  theme(legend.title = element_blank(),
        legend.position = c(0.2, 0.2)) +
  scale_x_date(breaks = seq(1950, 2100, 2) |> paste0("-01-01") |> as.Date(),
               labels = date_format("%Y")) +
  scale_y_continuous(breaks = seq(1000, 20000, 20),
                     labels = scales::dollar_format(accuracy = 1, pre = "", su = "€"))

base 100

Code 
ECRT2025 |>
  filter(sheet == "F28",
         variable %in% c("Ensemble", "Ensemble des fonctionnaires")) |>
  mutate(value = as.numeric(value)) |>
  group_by(variable) |>
  mutate(value = 100*value/value[1]) |>
  ggplot() + theme_minimal() + xlab("") + ylab("") +
  #scale_color_manual(values = viridis(8)[1:7]) +
  geom_line(aes(x = date, y = value, color = variable)) + 
  theme(legend.title = element_blank(),
        legend.position = c(0.2, 0.8)) +
  scale_x_date(breaks = seq(1950, 2100, 2) |> paste0("-01-01") |> as.Date(),
               labels = date_format("%Y")) +
  scale_y_continuous(breaks = seq(80, 200, 1))