if (FALSE) {
# combine results from output of an occ() call
spnames <- c('Accipiter striatus', 'Setophaga caerulescens',
'Spinus tristis')
out <- occ(query=spnames, from='gbif', gbifopts=list(hasCoordinate=TRUE),
limit=10)
occ2df(out)
occ2df(out$gbif)
out <- occ(
query='Accipiter striatus',
from=c('gbif','ebird','inat'),
gbifopts=list(hasCoordinate=TRUE), limit=2)
occ2df(out)
occ2df(out$gbif)
# or combine many results from a single data source
spnames <- c('Accipiter striatus', 'Spinus tristis')
out <- occ(query=spnames, from='gbif', limit=2)
occ2df(out$gbif)
}
Run the code above in your browser using DataLab