# NOT RUN {
#check out amphibiaweb taxonomy and extract only Bufonidae
head(amphweb$species)
amphweb.bufonidae<-amphweb[amphweb$family=="Bufonidae",]
#defrost bufonidae and inspect
bufonidae.defrosted<-defrost(query=amphweb.bufonidae$species)
synonymReport(bufonidae.defrosted)
# }
Run the code above in your browser using DataCamp Workspace