powered by
should take:
get_route_frequency(gtfs_obj, start_hour = 6, end_hour = 22, quiet = FALSE, service_id = "", dow = c(1, 1, 1, 1, 1, 0, 0))
a list of gtfs dataframes as read by the trread package.
(optional) an integer, default 6 (6 am)
(optional) an integer, default 22 (10 pm)
default FALSE. whether to echo process messages
(optional) a string from the calendar_df dataframe identifying a particular service schedule.
(optional) an integeger vector with days of week. monday=1. default: c(1,1,1,1,1,0,0)
a gtfs_obj with a dataframe of routes with variables for headway/frequency for a route within a given time frame
# NOT RUN { data(gtfs_obj) gtfs_obj <- get_route_frequency(gtfs_obj) x <- order(gtfs_obj$routes_frequency_df$median_headways) head(gtfs_obj$routes_frequency_df[x,]) # }
Run the code above in your browser using DataLab