利用leafletCN包在R里绘制可交互地图（叠加高德地图替代）

Leaflet 是一个开源并且对移动端友好的交互式地图 JavaScript 库。 在R语言中也使用相应的leaflet包调用。

然而，在国内，一些国外的地图资源在加载或使用中会存在问题。

为此，需要一个适应国情的扩展包leafletCN （GitHub - Lchiffon/leafletCN: An R gallery for China and other geojson choropleth map in leaflet），或在中文库leafletCN: An R gallery for China and other geojson choropleth map in leaflet (gitee.com)。

按教程，安装软件包，

?

1	devtools::install_github("lchiffon/leafletCN")

 

可能会提示报错，需要先安装rgeos包，看官方新闻，应该是这个geos和rgdal等地图相关的包都被抛弃了，推荐改用 sf和terra里的函数更好地实现相关功能。所以需要从版本存档或者github中下载。

?

1	devtools::install_github("cran/rgeos")

 

随后便可以使用amap()加载高德地图

?

1 2 3

leaflet() %>%   amap() %>%   addMarkers(env$Longitude, env$Latitude)