if (FALSE) {
vascan_search(q = "Helianthus annuus")
vascan_search(q = "Helianthus annuus", raw=TRUE)
vascan_search(q = c("Helianthus annuus", "Crataegus dodgei"), raw=TRUE)
# format type
## json
c <- vascan_search(q = "Helianthus annuus", format="json", raw=TRUE)
library("jsonlite")
fromJSON(c, FALSE)
## xml
d <- vascan_search(q = "Helianthus annuus", format="xml", raw=TRUE)
library("xml2")
xml2::read_xml(d)
# lots of names, in this case 50
splist <- names_list(rank='species', size=50)
vascan_search(q = splist)
# Curl options
invisible(vascan_search(q = "Helianthus annuus", verbose = TRUE))
}
Run the code above in your browser using DataLab