data-raw/create-gtfs-obj.R

devtools::load_all()
url <- "http://data.trilliumtransit.com/gtfs/duke-nc-us/duke-nc-us.zip"
gtfs_duke <- read_gtfs(url)
saveRDS(gtfs_duke, here::here('data-raw/gtfs_duke'))
usethis::use_data(gtfs_duke)
r-transit/tidytransit documentation built on Feb. 18, 2024, 8:03 p.m.