# NOT RUN {
# library(GADMTools)
# library(sp)
# France = gadm_loadCountries("FRA", level=1, basefile="./")
# Auvergne = subset(France,regions = "Auvergne", level=1)
# saveas(Auvergne, "./AUVERGNE")
# AUV <- gadm_loadCountries("AUVERGNE", level=1, basefile="./")
# plotmap(AUV)
# }
Run the code above in your browser using DataLab