# NOT RUN {
res <- occ_search(mediaType = 'StillImage', return = "media")
gbif_photos(res)
gbif_photos(res, which='map')
res <- occ_search(scientificName = "Aves", mediaType = 'StillImage',
return = "media", limit=150)
gbif_photos(res)
gbif_photos(res, output = '~/barfoo')
# }
Run the code above in your browser using DataLab