library(tidykml)
library(tidyverse)
library(ggmap)

nuts2_map <- get_map(kml_bounds("inst/extdata/map/capri_map.kml"))

Xinxin Yang's avatar
Xinxin Yang committed
save(nuts2_map, file = "data/nuts2_map.RData")


map_data <- prep_mapdata()
save(map_data, file = "data/map_data.RData")