# NOT RUN {
library(GADMTools)
data("Corsica")
Corse <- gadm_union(Corsica)
longitude <- runif(6, min=8.74, max = 9.25)
latitude <- runif(6, min=41.7, max = 42.6)
Cases <- runif(6, 25, 112)
DAT <- data.frame(longitude, latitude, Cases)
classDots(Corse, DAT, color="blue", value = "Cases", breaks = NULL,
steps = 4, labels = NULL, opacity = 0.5, title="",
note=NULL, legend = NULL)
# }
Run the code above in your browser using DataLab