Considering this tibble
library(tibble) mytab <- tribble( ~siren_ent, ~nbeta_dep01, ~nbeta_dep02, ~effeta_dep01, ~effeta_dep01, ~categ, "A",