powered by
getRefs(using = c("trophic", "habitat", "lifecycle", "morphology", "diagnostic", "distribution", "ScientificName", "Genus", "Family", "Class", "Order", "size"), fish.data = NULL, path = NULL)
data(fishbase) a <- which_fish("invertebrates", "trophic") refs <- getRefs("trophic", fish.data[a]) toprefs <- sort(table(unlist(refs)), decreasing=TRUE)
Run the code above in your browser using DataLab