taxon_id_pesi

[oggioniale]

this is the code:

insects <- data.frame(
   taxonID = c(1, 2, 3, 4, 5, 6),
   family = c(
     "Alexiidae", "Anthicidae",
     "Anthribidae", "Anthribidae",
     "Biphyllidae", "Brentidae"
   ),
   scientificName = c(
     "Sphaerosoma seidlitzi", "Endomia tenuicollis tenuicollis",
     "Anthribus fasciatus", "Phaenotherion fasciculatum fasciculatum",
     "Diplocoelus fagi", "Holotrichapion (Apiops) pisi"
   )
)
output <- ReLTER::taxon_id_pesi(
  table = insects,
  taxaColumn = 3
)
output

the output return also the check of first row of the input table

taxonID<dbl> | family<chr> | originalNameUsage<chr> | scientificName<chr> |  
-- | -- | -- | -- | --
1 | Alexiidae | Sphaerosoma seidlitzi | Sphaerosoma seidlitzi |  
2 | Anthicidae | Endomia tenuicollis tenuicollis | Sphaerosoma seidlitzi |  
3 | Anthribidae | Anthribus fasciatus | Sphaerosoma seidlitzi |  
4 | Anthribidae | Phaenotherion fasciculatum fasciculatum | Sphaerosoma seidlitzi |  
5 | Biphyllidae | Diplocoelus fagi | Sphaerosoma seidlitzi |  
6 | Brentidae | Holotrichapion (Apiops) pisi | Sphaerosoma seidlitzi