Emboîtement des niveaux de la nomenclature d’activités (A129 à A10) - nomenclature-worked

Données - INSEE

Last data update: 26 oct. 2026, 20:05

Last compile: 26 oct. 2026, 20:06

Table de passage entre les niveaux A129, A88, A38, A21 et A10 de la nomenclature d’activités, et libellés de chaque niveau.

Branches A129 par poste A10

emb |>
  left_join(filter(lib, niveau == "A10"), by = c("a10" = "code")) |>
  mutate(lab = paste0(a10, " - ", str_trunc(coalesce(libelle, "(libellé absent de la source)"), 40))) |>
  count(lab) |>
  ggplot(aes(x = n, y = fct_reorder(lab, n))) +
  geom_col(fill = bleu) +
  geom_text(aes(label = n), hjust = -0.2, size = 3.2) +
  scale_x_continuous(expand = expansion(mult = c(0, 0.1))) +
  theme_ref() +
  labs(x = "Nombre de postes A129", y = NULL, title = "Combien de postes A129 dans chaque poste A10 ?")

Postes A129 par poste A21

emb |>
  count(a21) |>
  ggplot(aes(x = n, y = fct_reorder(a21, n))) +
  geom_col(fill = rose) +
  geom_text(aes(label = n), hjust = -0.2, size = 3.2) +
  scale_x_continuous(expand = expansion(mult = c(0, 0.1))) +
  theme_ref() +
  labs(x = "Nombre de postes A129", y = "Poste A21", title = "Poids de chaque poste A21 en nombre de branches A129")

Emboîtement

emb |>
  print_table_conditional()

Libellés

lib |>
  print_table_conditional()