时间戳

首页 > 解决方案 > 如何向 mapdist 函数添加可选参数？

r - 如何向 mapdist 函数添加可选参数？

问题描述

我正在尝试使用 R ggmap 包输入可选参数以获取考虑交通的旅行时间，但是，我无法弄清楚如何做到这一点。

例如，以下代码导致 1844 秒

library(ggmap)
tripinfo <- mapdist('Chandler', 'Phoenix', 
                    mode = 'driving')
tripinfo$seconds

这与将以下 API URL 直接插入 Web 浏览器相同（请注意，这不会直接运行，因为我已将我的真实 API 密钥替换为“apikey”）

https://maps.googleapis.com/maps/api/distancematrix/json?origins=Chandler&destinations=Phoenix&mode=driving&language=en-EN&key=apikey

但是，如果我尝试使用 ggmap mapdist 函数添加应该给我包括交通在内的旅行时间的可选参数，我仍然得到相同的 1844 秒：

tripinfo <- mapdist('Chandler', 'Phoenix', 
                    mode = 'driving', traffic_model='best_guess', departure_time='now')

相反，如果我直接在 URL 中输入附加参数，我会得到 1700 秒的“duration_in_traffic”“值”（这是我想要的信息）。这是那个网址：

https://maps.googleapis.com/maps/api/distancematrix/json?origins=Chandler&destinations=Phoenix&mode=driving&language=en-EN&key=apikey&traffic_mode=best_guess&departure_time=now

任何想法如何将可选参数添加到 ggmap mapdist 函数（或者也许有另一种方法可以完全做到这一点，但仍然使用 R）？

标签： rggmap

解决方案

推荐阅读