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

get_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("Araucaria angustifolia (Bertol.) Kuntze",
"Butia catarinensis Noblick & Lorenzi",
"Adesmia paranensis Burkart")
spp_new <- get_binomial(species_names = spp)
spp_new
#> [1] "Araucaria angustifolia" "Butia catarinensis"     "Adesmia paranensis"