googlwayパッケージの使用時にエラーが発生しました。

Question

こんにちは私はgoogle_distance関数とトラフィックモデルの選択に関係しています。私はライン「traffic_model = 『悲観的』」私は問題ありませんがドロップするとError in match.arg(traffic_model) : 'arg' should be one of

：私は次のメッセージが表示され

x <- as.POSIXct("2017-02-2 00:00:00", tz = "Europe/Paris") 
google_distance(origins = list(c(48.93, 2.175)), 
        destinations =list(c(48.95, 2.19)), 
        mode="driving", 
        departure_time=x, 
        traffic_model='pessimistic', 
        key = key, 
        simplify = T) 

：私は私のスクリプトを実行 。

Answer 1

a bug with that particular argumentが見つかりました。私はあなたが

library(devtools) 
devtools::install_github("SymbolixAU/googleway") 

を行うことによって得ることができます。そして、それは

library(googleway) 

x <- as.POSIXct("2017-02-11 00:00:00", tz = "Europe/Paris") 
key <- "your_api_key" 
google_distance(origins = list(c(48.93, 2.175)), 
           destinations =list(c(48.95, 2.19)), 
           mode="driving", 
           departure_time=x, 
           traffic_model='pessimistic', 
           key = key, 
           simplify = T) 


# $destination_addresses 
# [1] "34 Rue Calmette et Guérin, 78500 Sartrouville, France" 
# 
# $origin_addresses 
# [1] "131 Rue Lavoisier, 78800 Houilles, France" 
# 
# $rows 
# elements 
# 1 3.9 km, 3928, 10 mins, 618, 10 mins, 598, OK 
# 
# $status 
# [1] "OK"