# NOT RUN {
x <- data.frame(species = letters[1:10],
decimallongitude = runif(100, -180, 180),
decimallatitude = runif(100, -90,90))
cc_equ(x)
cc_equ(x, value = "flagged")
# }
Run the code above in your browser using DataLab