6.210 - Emploi intérieur salarié par branche en nombre de personnes (38 postes) - T_6210

Données - INSEE

Structure

Emploi salarié par grande branche

Emploi salarié par branche, en personnes.

Code
`T_6210` |>
  filter(sheet == sh[1], grepl("^A5_", code)) |>
  group_by(year) |> mutate(part = value / sum(value)) |> ungroup() |>
  arrange(desc(code)) |> mutate(label = factor(label, levels = unique(label))) |>
  ggplot() + theme_minimal() + xlab("") + ylab("Part du total") +
  geom_area(aes(x = year, y = part, fill = label)) +
  scale_x_continuous(breaks = seq(1950, 2030, 10)) +
  scale_y_continuous(labels = percent_format(accuracy = 1)) +
  scale_fill_manual(values = viridis(5)) +
  theme(legend.title = element_blank(), legend.position = "bottom") +
  guides(fill = guide_legend(nrow = 3))

En niveau (Milliers)

Code
`T_6210` |>
  filter(sheet == sh[1], grepl("^A5_", code)) |>
  ggplot() + theme_minimal() + xlab("") + ylab("Milliers") +
  geom_line(aes(x = year, y = value, color = label)) +
  scale_x_continuous(breaks = seq(1950, 2030, 10)) +
  theme(legend.title = element_blank(), legend.position = "bottom") +
  guides(color = guide_legend(nrow = 3))

Par branche détaillée (2025)

Code
`T_6210` |>
  filter(sheet == sh[1], year == last_y, grepl("^A38_", code)) |>
  mutate(label = reorder(str_trunc(label, 55), value)) |>
  ggplot() + theme_minimal() + xlab("") + ylab("Milliers") +
  geom_col(aes(x = label, y = value), fill = "#2b6cb0") + coord_flip()

Table (2025)

Code
`T_6210` |>
  filter(sheet == sh[1], year == last_y, grepl("^A5_", code)) |>
  transmute(Branche = label, Code = code, Valeur = round(value, 1),
            `% du total` = round(100 * value / sum(value), 1)) |>
  print_table_conditional()
Branche Code Valeur % du total
Agriculture, sylviculture et pêche A5_AZ 364.6 1.3
Industrie manufacturière, industries extractives et autres A5_BE 2925.8 10.8
Construction A5_FZ 1596.9 5.9
Services principalement marchands A5_GU 13926.7 51.3
Services principalement non marchands (*) A5_OQ 8319.2 30.7