if (FALSE) {
x <- data.frame(species = letters[1:10],
decimalLongitude = runif(100, -180, 180),
decimalLatitude = runif(100, -90,90))
cc_urb(x)
cc_urb(x, value = "flagged")
}
Run the code above in your browser using DataLab