# NOT RUN {
clean <- data.frame(species = letters[1:10],
decimallongitude = runif(100, -180, 180),
decimallatitude = runif(100, -90,90),
dataset = "FR")
cd_ddmm(x = clean, value = "flagged")
#problematic dataset
lon <- sample(0:180, size = 100, replace = TRUE) + runif(100, 0,0.59)
lat <- sample(0:90, size = 100, replace = TRUE) + runif(100, 0,0.59)
prob <- data.frame(species = letters[1:10],
decimallongitude = lon,
decimallatitude = lat,
dataset = "FR")
cd_ddmm(x = prob, value = "flagged")
# }
Run the code above in your browser using DataLab