x <- data.frame(species = letters[1:10],
decimallongitude = runif(100, -180, 180),
decimallatitude = runif(100, -90,90))
#large buffer for demonstration, using geod = FALSE for shorter runtime
cc_inst(x, value = "flagged", buffer = 10, geod = FALSE)
if (FALSE) {
#' cc_inst(x, value = "flagged", buffer = 50000) #geod = T
}
Run the code above in your browser using DataLab