if (FALSE) {
# 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")
}
}
Run the code above in your browser using DataLab