Make Stops into Simple Features Points

get_stop_geometry(stops)

Arguments

stops

a gtfs$stops dataframe

Value

an sf dataframe for gtfs routes with a point column

Examples

data(gtfs_obj) some_stops <- gtfs_obj$stops[sample(nrow(gtfs_obj$stops), 40),] some_stops_sf <- get_stop_geometry(some_stops) plot(some_stops_sf)
#> Warning: plotting the first 10 out of 13 attributes; use max.plot = 13 to plot all