Extract the binomial name (Genus + specific epithet) from a Scientific Name

Extract the binomial name (Genus + specific epithet) from a Scientific Name

extract_binomial(species_names)

Arguments

species_names

(character) Scientific names to be converted to binomial names

Value

A vector with the binomial names (Genus + specific epithet).

Examples

spp <- c("Panthera onca (Linnaeus, 1758)",
"Zonotrichia capensis subtorquata Swainson, 1837",
"Paraganaspis egeria Díaz & Gallardo, 1996",
"Arrenurus tumulosus intercursor")
spp_new <- extract_binomial(species_names = spp)
spp_new
#> [1] "Panthera onca"        "Zonotrichia capensis" "Paraganaspis egeria" 
#> [4] "Arrenurus tumulosus"