Séries longues sur les salaires (1950-2010) - SLS2010

Données - INSEE

IND03 : indices SHBO, SMIC, salaire moyen, plafond sécurité sociale (en euros courants, pour une durée légale hebdomadaire de 39 H)

Code
SLS2010_IND03 |>
  print_table_conditional()

IND04 : indices SHBO, SMIC, salaire moyen, plafond sécurité sociale (en euros constants, pour une durée légale hebdomadaire de 39 H)

Code
SLS2010_IND04 |>
  print_table_conditional()

SM01 : salaire minimum pour 35 heures hebdomadaires (en euros courants)

Code
SLS2010_SM01 |>
  print_table_conditional()

SM02 : salaire minimum de 1951 à 2005 (en euros courants)

Code
SLS2010_SM02 |>
  print_table_conditional()

TC01 : évolution du salaire net annuel moyen

Table

Code
SLS2010_TC01 |>
  print_table_conditional()

Figure

Code
SLS2010_TC01 |>
  filter(sexe == "Ensemble",
         str_starts(categorie, "Evolution")) |>
  transmute(date = as.Date(paste0(as.numeric(annee), "-01-01")),
            variable = categorie,
            value = value / 100) |>
  ggplot() + geom_line(aes(x = date, y = value, color = variable, linetype = variable)) +
  theme_minimal() + xlab("") + ylab("") +
  scale_color_manual(values = c("red", "blue", "blue")) +
  scale_linetype_manual(values = c("dashed", "dotdash", "solid")) +
  scale_x_date(breaks = seq(1940, 2100, 10) |> paste0("-01-01") |> as.Date(),
               labels = date_format("%Y")) +
  scale_y_continuous(breaks = 0.01*seq(-100, 500, 5),
                labels = percent_format(accuracy = 1),
                limits = c(-0.05, 0.25)) +
  theme(legend.position = c(0.6, 0.9),
        legend.title = element_blank())