# \donttest{
library(sf)
# Create example sf object
nc <- st_read(system.file("shape/nc.shp", package = "sf"), quiet = TRUE)
nc$incidence <- runif(nrow(nc), 0, 100)
# Plot
p1 <- plot_single_map(nc, "incidence", "Incidence")
# }
Run the code above in your browser using DataLab