# NOT RUN {
library(dplyr)
library(valhallr)
# set up our inputs
origins <- bind_rows(test_data("parliament"), test_data("uottawa"), test_data("cntower"))
destinations <- bind_rows(test_data("cdntirecentre"), test_data("parliament"))
# generate a tidy origin-destination table
od <- od_table (froms = origins,
from_id_col = "name",
tos = destinations,
to_id_col = "name",
costing = "auto",
batch_size = 100,
minimum_reachability = 500)
# }
Run the code above in your browser using DataLab