Convert a GTFS stops data loaded using gtfs2gps::read_gtf() into a point simple feature (sf).
gtfs_stops_as_sf(gtfs, crs = 4326)A GTFS data.
The coordinate reference system represented as an EPSG code. The default value is 4326 (latlong WGS84)
A simple feature (sf) object.
poa <- read_gtfs(system.file("extdata/poa.zip", package = "gtfs2gps"))
#> Unzipped the following files to /tmp/Rtmp8QhZHv/gtfsio:
#> * agency.txt
#> * calendar.txt
#> * routes.txt
#> * shapes.txt
#> * stop_times.txt
#> * stops.txt
#> * trips.txt
#> Reading agency.txt
#> Reading calendar.txt
#> Reading routes.txt
#> Reading shapes.txt
#> Reading stop_times.txt
#> Reading stops.txt
#> Reading trips.txt
poa_shapes <- gtfs_shapes_as_sf(poa)
poa_stops <- gtfs_stops_as_sf(poa)