library(ArctosR)
if (interactive()) {
# Request to download all available data
query <- get_records(
scientific_name = "Canis lupus", guid_prefix = "MSB:Mamm",
columns = list("guid", "parts", "partdetail")
)
# Grab the dataframe of records from the query
df <- response_data(query)
}
Run the code above in your browser using DataLab