Last data update: 26 oct. 2026, 20:05
Last compile: 26 oct. 2026, 20:05
Nomenclature d’activités française (NAF rév. 2, 2008) avec les intitulés complets et deux versions abrégées (65 et 40 caractères) pour les affichages contraints. La nomenclature compte 21 sections, 88 divisions, 272 groupes, 615 classes et 732 sous-classes.
naf |>
count(niveau) |>
mutate(niveau = factor(niveau, levels = c("Section", "Division", "Groupe", "Classe", "Sous-classe"))) |>
ggplot(aes(x = niveau, y = n)) +
geom_col(fill = bleu) +
geom_text(aes(label = n), vjust = -0.4, fontface = "bold") +
scale_y_continuous(expand = expansion(mult = c(0, 0.1))) +
theme_ref() +
labs(x = NULL, y = "Nombre de postes", title = "La NAF rév. 2 en cinq niveaux emboîtés")
naf |>
filter(niveau == "Sous-classe") |>
count(section) |>
ggplot(aes(x = n, y = fct_reorder(section, 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 sous-classes", y = "Section", title = "Nombre de sous-classes de la NAF par section")
naf |>
filter(!is.na(libelle)) |>
transmute(`Complet` = nchar(libelle), `65 caractères` = nchar(libelle_65), `40 caractères` = nchar(libelle_40)) |>
pivot_longer(everything()) |>
mutate(name = factor(name, levels = c("Complet", "65 caractères", "40 caractères"))) |>
ggplot(aes(x = value, fill = name)) +
geom_histogram(binwidth = 5, show.legend = FALSE) +
facet_wrap(~ name, ncol = 1) +
scale_fill_manual(values = c(bleu, vert, rose)) +
theme_ref() +
labs(x = "Nombre de caractères", y = "Postes", title = "Longueur des intitulés selon la version")
naf |> select(code, niveau, section, libelle, libelle_65, libelle_40) |>
print_table_conditional()