# NOT RUN {
if (interactive()) {
library(r5r)
# directory with street network and gtfs files
path <- system.file("extdata/poa", package = "r5r")
r5r_core <- setup_r5(data_path = path, temp_dir = TRUE)
}
# }
Run the code above in your browser using DataLab