Plot GTFS stops and trips
# S3 method for class 'tidygtfs'
plot(x, ...)
plot
# \donttest{
local_gtfs_path <- system.file("extdata",
"google_transit_nyc_subway.zip",
package = "tidytransit")
nyc <- read_gtfs(local_gtfs_path)
plot(nyc)
# }