inseefrlab/validinsee

Valider certaines données produites par l’Insee avec R

validinsee

Le package R validinsee permet de valider certaines données produites par l’Insee, en particulier la conformité de numéros Siren ou Siret.

Installation

# install.packages("remotes")
remotes::install_github("InseeFrLab/validinsee")

Chargement

library(validinsee)

Validité de numéros SIREN ou SIRET

La fonction validation_siren vérifie si les éléments d’un vecteur sont des SIREN valides (identifiant de l’entreprise formé de 9 caractères) :

validation_siren(c("200034528", "200034582", NA))
#> [1]  TRUE FALSE    NA

La fonction validation_siret vérifie si les éléments d’un vecteur sont des SIRET valides (identifiant de l’établissement formé de 14 caractères) :

validation_siret(c("20003452800014", "20003452800041", NA))
#> [1]  TRUE FALSE    NA

Règles de validation

La vérification se base sur la formule de Luhn.

• un SIREN est valide si sa somme de Luhn est un multipe de 10 ;

• un SIRET est valide si sa somme de Luhn est un multipe de 10 et si la somme de Luhn de son SIREN (9 premiers chiffres) est un multiple de 10 ;

• un SIRET de La Poste (SIREN 356000000) ne respectant pas la règle ci-dessus fait l’objet d’un traitement différencié : il est valide si la somme des chiffres le composant est un multiple de 5.

validinsee's Issues

rename function to explicit their boolean output?

Thanks for the package, very useful!
Would it make sense to rename the functions to things like is_valid_siren? I somehow feel that it would make more sense. What do you think?