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