R语言绘图|快速绘制省级地图

本文主要介绍在R中如何利用recharts包来快速绘制一张省级地图，recharts底层通过对ECharts的调用，可以实现快速绘图。不过该图调节参数有限，若对图形参数调整有更多需求，可使用ggplot2或ArcGIS、QGIS等来进行绘制。

1、数据准备

以2019年河南省18个地级市GDP为例，绘制GDP颜色填充地图。数据为2列，一列city，一列GDP。数据可在后台回复【20220907】获得。

#安装与加载package
devtools::install_github('cosname/recharts') #install
library(recharts)
library(dplyr)
library(RColorBrewer)

#读入数据
mapData <- readxl::read_xlsx("河南省GDP.xlsx") # read data
mapData
#   city        GDP
# 1 郑州市   11590.
# 2 洛阳市    5035.
# 3 南阳市    3815.
# 4 许昌市    3396.

2、图形绘制

1. 利用eMap() 函数进行地图绘制

eMap(mapData, namevar =~ city, datavar = ~ GDP, region = "河南",
     legend = FALSE,  subtitle = "shine",
     theme = "roma",
     title = "河南省2021年GDP(亿元)")
# theme主题类型有：
my.theme <- c("default", "vintage", "dark", "westeros", "essos", "wonderland", "walden", 
              "chalk", "infographic", "macarons", "roma", "shine", "purplepassion")

参数解读：mapData为数据文件，namevar与datavar参数分别表示地名以及连续变量名，region为需要作图的省份，legend为图例，theme为主题，除了使用主题外，还可以自定义颜色，见下文；title为图标题。

自定义颜色1

通过color参数实现自定义颜色。

eMap(mapData, namevar =~ city, datavar = ~ GDP, region = "河南",
     legend = FALSE, 
     color = c("red", "white"),
    title = "河南省2021年GDP(亿元)")

自定义颜色2

eMap(mapData, namevar =~ city, datavar = ~ GDP, region = "河南",
     legend = FALSE, 
     color = c("#64004B", "#E8D3E3"),
     title = "河南省2021年GDP(亿元)")

自定义颜色3

eMap(mapData, namevar =~ city, datavar = ~ GDP, region = "河南",
     legend = FALSE, 
     color = brewer.pal(5, "Blues") %>% rev(), 
     title = "河南省2021年GDP(亿元)")

3、其他

使用help(eMap) 函数可进一步查看该函数内的参数的详细解读。其他绘图方法可进一步阅读公众号其他文章。

如有帮助请多多点赞哦！