1、绘制中国地图
library("maptools")
china_map = readShapePoly("D:/Astatistics/R/画热力图数据材料/中国省级地图空间数据文件/bou2_4p.shp") # 读取地图空间数据
plot(china_map)#可以不画
2*、改变投影方式
library(ggplot2)
ggplot(china_map,aes(x=long,y=lat,group=group)) +
geom_polygon(fill="white",colour="grey") +
coord_map("polyconic")
3、加载和拼接行政信息