library(cnmap)
map1 <- getMap(code = "110000") # get the map data of Beijing City
map2 <- getMap(code = "100000") # get the map data of China.
# get the map data of Beijing City, and sub regions is also included.
map1 <- getMap(code = "110000", subRegion = TRUE)
Run the code above in your browser using DataLab