R语言绘图|快速绘制全国地图

上一期内容介绍了如何利用recharts包快速绘制一张省份分级色彩地图，本文继续介绍如何利用该包快速绘制一张全国分级色彩地图。

1、数据准备

以国家统计局^[1]官方网站上关于2020年我国31个省份人均GDP（单位：元）（未包含港澳台数据）为例。数据可在国家统计局网站下载，或在后台回复【20220909】获取。

## 安装与加载package
setwd("C:/Users/Acer/Desktop")
devtools::install_github('cosname/recharts') #install
install.packages("RColorBrewer")
library(recharts)
library(RColorBrewer)

#数据读入。注意省份的名称写法
GDP <- readxl::read_xlsx("2020年人均GDP.xlsx")
head(GDP)
#  Province Per.GDP
#1 北京      164889
#2 天津      101614
#3 河北       48564
#4 山西       50528
#5 内蒙古     72062
#6 辽宁       58872

2、图形绘制

#绘图
eMap(dat = GDP, namevar =~ Province, datavar = ~ Per.GDP, region = "china", 
     color = c("red", "white"), legend = FALSE,  title = "2020年人均GDPZ（元）")

eMap() 绘图函数解读：dat为数据文件，注意省份名称写法；namevar和datavar参数分别指向数据文件的省份名称变量和数值变量；region = "china" 表示底图；color为颜色设置；legend表示是否显示图例；title为图标题。

颜色修改1

eMap(dat = GDP, namevar =~ Province, datavar = ~ Per.GDP, region = "china", 
     color = c("blue", "white"), legend = FALSE, title = "2020年人均GDP（元）")

颜色修改2

eMap(dat = GDP, namevar =~ Province, datavar = ~ Per.GDP, region = "china", 
     color = brewer.pal(9, "YlGn") %>% rev(), legend = FALSE, title = "2020年人均GDP（元）")

3、其他

需要注意的是，利用recharts包绘制的地图，其形式较为简单，主要用于数据初步探索，尚未达到出版质量要求。如需绘制更高标准的地图可进一步借助ggplot2、sf等包进行地图绘制，或ArcGIS、QGIS等专业地图处理软件。更多内容可进一步阅读公众号其他文章。

如有帮助请多多点赞哦！

参考资料