Exports a GTFS object to a zip archive. Internal `dates_services` data are omitted, GTFS dates use `YYYYMMDD`, and spatial stops/shapes are converted back to standard text-table columns.
Examples
path <- tempfile(fileext = ".zip")
write_gtfs(for_rail_gtfs, path)