之前发现过一个很有意思的网站:Draw all roads in a city at once,可以绘制一个城市的路网地图,而且还绘制的很漂亮,就想用 R 画一下。另外我还从一则微信推文里面爬取了阜阳市新冠肺炎确诊病例的分布情况并将他们绘制在路网地图上。
![]()
准备工作
- 下载地图数据:ECharts Gallery - 地图GEOJSON下载
- 高德地图密钥并把密钥存放为环境变量。
绘制路网地图
首先导入我们需要的 R 包:
library(osmdata) |
osmdata 包可以用来把 OpenStreetMap 数据导入 R 中。dodgr 包中的 dodgr_streetnet() 函数可以用来从 sf 表单中提取路网数据。
更多内容欢迎加入课程学习~
![]()
点击这里跳转到 RStata 短书平台获取附件:如何绘制一幅漂亮的路网地图?网页文本提取、地理编码与可视化
评论