# NOT RUN {
x <- data.frame(species = letters[1:10],
decimallongitude = c(runif(106, -180, 180), NA, "13W33'", "67,09", 305),
decimallatitude = runif(110, -90,90))
cc_val(x)
cc_val(x, value = "flagged")
# }
Run the code above in your browser using DataLab