# NOT RUN {
data_path <- system.file("extdata/spo_gtfs.zip", package = "gtfstools")
gtfs <- read_gtfs(data_path)
names(gtfs)
gtfs <- read_gtfs(data_path, files = c("trips", "stop_times"))
names(gtfs)
# }
Run the code above in your browser using DataCamp Workspace