Update routing profile, close #1147

Author: Robinlovelace

13-transport.Rmd

@@ -540,7 +540,7 @@ This is done using the publicly available OSRM service with the **stplanr** func
 
 ```{r 13-transport-18, message=FALSE}
 routes_short = route(l = desire_lines_short, route_fun = route_osrm,
-                     osrm.profile = "bike")
+                     osrm.profile = "car")
 ```
 
 The output is `routes_short`, an `sf` object representing routes on the transport network\index{network} that are suitable for cycling (according to the OSRM routing engine at least), one for each desire line.