Convert origin-destination data to spatial lines
Origin-destination ('OD') flow data is often provided in the form of 1 line per flow with zone codes of origin and destination centroids. This can be tricky to plot and link-up with geographical data. This function makes the task easier.
od2line( flow, zones, destinations = NULL, zone_code = names(zones)[1], origin_code = names(flow)[1], dest_code = names(flow)[2], zone_code_d = NA, silent = FALSE ) od2line2(flow, zones)
flow |
A data frame representing origin-destination data.
The first two columns of this data frame should correspond
to the first column of the data in the zones. Thus in |
zones |
A spatial object representing origins (and destinations if no separate destinations object is provided) of travel. |
destinations |
A spatial object representing destinations of travel flows. |
zone_code |
Name of the variable in |
origin_code |
Name of the variable in |
dest_code |
Name of the variable in |
zone_code_d |
Name of the variable in |
silent |
TRUE by default, setting it to TRUE will show you the matching columns |
Origin-destination (OD) data is often provided
in the form of 1 line per OD pair, with zone codes of the trip origin in the first
column and the zone codes of the destination in the second column
(see the vignette("stplanr-od")) for details.
od2line() creates a spatial (linestring) object representing movement from the origin
to the destination for each OD pair.
It takes data frame containing
origin and destination cones (flow) that match the first column in a
a spatial (polygon or point) object (zones).
Other od:
dist_google(),
od2odf(),
od_aggregate_from(),
od_aggregate_to(),
od_coords2line(),
od_coords(),
od_dist(),
od_id,
od_oneway(),
od_to_odmatrix(),
odmatrix_to_od(),
points2flow(),
points2odf()
od_data <- stplanr::flow[1:20, ] l <- od2line(flow = od_data, zones = cents_sf) plot(sf::st_geometry(cents_sf)) plot(l, lwd = l$All / mean(l$All), add = TRUE) l <- od2line(flow = od_data, zones = cents) # When destinations are different head(destinations[1:5]) od_data2 <- flow_dests[1:12, 1:3] od_data2 flowlines_dests <- od2line(od_data2, cents_sf, destinations = destinations_sf) flowlines_dests plot(flowlines_dests)
Please choose more modern alternatives, such as Google Chrome or Mozilla Firefox.