下面介绍用R语言如何绘制:
1 加载数据 ·
以民政部网站数据为例,利用R语言如何下载数据和绘制地图。民政部数据的API为http://xzqh.mca.gov.cn/data/,全国边界矢量为quanguo_Line.geojson,全国省级矢量为quanguo.json,全国县级矢量为xian_quanguo.json。
# 前提要先安装这些包,再进行加载
library(geojsonsf)
library(sf)
library(ggplot2)
library(cowplot)
library(tidyverse)
library(ggspatial)
# 调用API
chn <- st_read(dsn = "http://xzqh.mca.gov.cn/data/quanguo.json",
stringsAsFactors=FALSE)#全国省图
由于该数据没有投影,需要给定投影。
st_crs(chn) = 4326 #WGS84,EPSG:4326
#加载线边框
l <- st_read(dsn = "http://xzqh.mca.gov.cn/data/quanguo_Line.geojson",
stringsAsFactors=FALSE)
#选择国境线
g<-l[l$QUHUADAIMA == "guojiexian",]
绘制地图
#利用ggplot2绘制
map <- ggplot() +
geom_sf(data = chn,
color='black',#线条颜色
版权声明:本文为qq_41127811原创文章,遵循CC 4.0 BY-SA版权协议,转载请附上原文出处链接和本声明。