# if you send a taxon name, pass in a key
iucn_summary("Lutra lutra")
ia <- iucn_summary(c("Panthera uncia", "Lynx lynx"))
ia <- iucn_summary(c("Panthera uncia", "Lynx lynx", "aaa"))
## get detailed distribution
iac <- iucn_summary("Ara chloropterus", distr_detail = TRUE)
iac[[1]]$distr
# If you pass in an IUCN ID, you don't need to pass in a Redlist API Key
ia <- iucn_summary_id(c(22732, 12519))
# extract status
iucn_status(ia)
# extract other available information
ia[['Lynx lynx']]$history
ia[['Panthera uncia']]$distr
ia[[2]]$trend
Run the code above in your browser using DataLab