osrm (version 2.0.0)

osrmViarouteGeom: Get the Travel Geometry Between Two Points

Description

Build and send an OSRM API query to get the travel geometry between two points. This function interface the viaroute OSRM service.

Usage

osrmViarouteGeom(src, dst, sp = FALSE)

Arguments

src

identifier, latitude and longitude of the origine point (vector of length 3).

dst

identifier, latitude and longitude of the destination point (vector of length 3).

sp

if sp is TRUE the function returns a SpatialLinesDataFrame.

Value

• If sp is FALSE, a data frame is returned. It contains the longitudes and latitudes of the travel path between the two points. If sp is TRUE a SpatialLinesDataFrame is returned. It contains two fields : identifiers of origine and destination.

See Also

osrmViaroute

Examples

# Load data
data("com")
# Travel path between points
routeGeom <- osrmViarouteGeom(src = com[1, c("comm_id", "lat","lon")],
                              dst = com[15, c("comm_id", "lat","lon")])

# Display the path
plot(com[c(1,15),3:4], asp =1, col = "red", pch = 20, cex = 1.5)
points(routeGeom[,2:1], type = "l", lty = 2)
text(com[c(1,15),3:4], labels = com[c(1,15),2], pos = 2)

# Travel path between points - output a SpatialLinesDataFrame
routeGeom2 <- osrmViarouteGeom(src=c("Bethune", 50.5199, 2.64781), 
                               dst = c("Cassel", 50.80016, 2.486388), 
                               sp = TRUE)
class(routeGeom2)
# Display the path
plot(com[c(1,16),3:4], asp =1, col = "red", pch = 20, cex = 1.5)
plot(routeGeom2, lty = 2, add=TRUE)
text(com[c(1,16),3:4], labels = com[c(1,16),2], pos = 2)