# NOT RUN {
# Using the rgbif package and the source argument
if (requireNamespace("rinat", quietly=TRUE)) {
d <- get_inat_obs_project("reptileindia")
d <- format_bdvis(d, source="rinat")
# Using a configuration object, matches 'rinat' schema
conf <- list(Latitude="latitude",
Longitude="longitude",
Date_collected="Observed.on",
Scientific_name="Scientific.name")
d <- format_bdvis(d, config=conf)
# Passing individual parameters, all optional
d <- format_bdvis(d,
Latitude="lat",
Longitude="lng",
Date_collected="ObservedOn",
Scientific_name="sciname")
}
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab