osrmTrip returns (non-numeric argument to binary operator

[314a]

In package osrm version 3.0.0
try:

data("com")
trips <- osrmTrip(loc = com[1101:1150, c(1,3,4)])

Error is on line 134-136 of file osrmTrip.R:

df <- data.frame(start, end,  
                       duration = res$trips[nt,]$legs[[1]][,3] / 60,  
                       distance = res$trips[nt,]$legs[[1]][,4] / 1000)

The distance column in the returned seems to have changed order in the json
Potential solution, replace 134-136 with

df <- data.frame(start, end, 
                       duration = res$trips[nt,]$legs[[1]][,3] / 60, 
                       distance = res$trips[nt,]$legs[[1]][,2] / 1000)

or alternatively

df <- data.frame(start, end, 
                       duration = res$trips[nt,]$legs[[1]][,"duration"] / 60, 
                       distance = res$trips[nt,]$legs[[1]][,"distance"] / 1000)

[rCarto]

thank you very much ), I'll correct this quickly