# Remove genus named from species taxa
species_data <- c("Carnivora;Felidae;Panthera;Panthera leo",
"Carnivora;Felidae;Panthera;Panthera tigris",
"Carnivora;Ursidae;Ursus;Ursus americanus")
obj <- parse_tax_data(species_data, class_sep = ";")
remove_redundant_names(obj)
Run the code above in your browser using DataLab