example of how to use GTFS data and dplyr