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