R语言高德路径规划

must be it

于 2023-02-16 16:21:36 发布

阅读量173

点赞数

分类专栏： R 高德路径分析文章标签： r语言开发语言

本文链接：https://blog.csdn.net/weixin_67757110/article/details/129027387

版权

R 同时被 2 个专栏收录

5 篇文章 0 订阅

订阅专栏

高德路径分析

1 篇文章 0 订阅

订阅专栏

该文介绍了如何利用R语言调用高德地图API进行路径规划。首先，调用API进行路径规划，然后加载相关R包处理数据。文章提供了两种方式，一是直接输入地址名称，二是输入经纬度数据。对于经纬度方式，从CSV文件读取数据，通过循环结构获取每个起点到终点的距离和时长，并将结果存储为列表。最后，文章提到了数据清洗和格式化输出的过程。

摘要由CSDN通过智能技术生成

1.调用高德API路径规划接口

2.加载相应的R包

3.编写函数运行代码

##主体代码如下：

方式1.输入地址名称数据进行规划

#强制地理编码

本次路径规划代码如下，地理编码程序见其他文章

routes2=fromJSON(paste0('https://restapi.amap.com/v3/direction/walking?origin=',s_pnt,'&destination=',e_pnt,'&key=',key))
dis=routes2$route$paths$distance
dur=routes2$route$paths$duration

方式2.输入高德经纬度数据进行规划

###通过传入经纬度实现高德路径规划
library(jsonlite)
library(htmltools)
library(readr)
library(readxl)
library(tidyr)
df=read.csv('D:/sy/wz/fenxijieguo.csv') #
parks=unite(df,'park',gcj02_lon,gcj02_lat,sep=',')
school=unite(df,'schools',gc_lon,gc_lat,sep=',',remove=FALSE)
location=data.frame(qidian=school$schools,zhongdian=parks$park)
is.character(location$qidian)
distancelist=list()
durationlist=list()
startlist=list()
endlist=list()
for (i in 1:nrow(location)) {
st=location[i,1]
end=location[i,2]
routeline=fromJSON(paste0('https://restapi.amap.com/v3/direction/walking?origin=',s_pnt,'&destination=',e_pnt,'&key=',key))
distance=routeline$route$paths$distance
duration=routeline$route$paths$duration
startlist[i]=st
endlist[i]=end
distancelist[i]=distance
durationlist[i]=duration
}
##清洗数据格式列表输出数据。