R/nom_vernaculaire_aspe.R
nom_vernaculaire_aspe.RdCette fonction permet d'associer à chaque code taxon ASPE son nom vernaculaire correspondant. Elle utilise une table de correspondance codée en dur, constituée :
de la liste NOMS fournie par l'utilisateur ;
des noms vernaculaires issus de la table officielle des espèces (extrait du document fourni contenant l'ensemble des codes ASPE).
nom_vernaculaire_aspe(codes)Un vecteur de même longueur que codes, contenant les noms
vernaculaires correspondants.
Pour les codes non reconnus, la valeur retournée est le code fourni.
Lorsque plusieurs sources fournissent un nom pour un même code, la
correspondance provenant de la table utilisateur NOMS est considérée
prioritaire.
Si un code taxon ne figure dans aucune table, la fonction renvoie
simplement le code d'origine.
La table de correspondance inclut l'ensemble des taxons présents :
dans la table utilisateur (ex. : "ABL" → "Ablette",
"BRX" → "Brème sp.", etc.) ;
dans le document de référence joint (ex. : "APR" →
"Apron du Rhône", "OBL" → "Omble chevalier",
"CPV" → "Cyprinodonte de Valence", etc.).
Ce mécanisme permet d'assurer la cohérence entre les codes ASPE bruts et les regroupements éventuels effectués en amont (ex. néotaxons d'IPR).
nom_vernaculaire_aspe(c("ABL", "VAB", "TRF", "XXX", "ANG", "CPV"))
#> ABL VAB TRF
#> "Ablette" "Vairon béarnais" "Truite fario"
#> <NA> ANG CPV
#> "XXX" "Anguille" "Cyprinodonte de Valence"
# Résultat :
# [1] "Ablette" "Vairon béarnais" "Truite fario"
# [4] "XXX" "Anguille" "Cyprinodonte de Valence"