if (FALSE) {
# For general use, please set these three variables:
Sys.setenv ("gtfs_home" = "")
Sys.setenv ("gtfs_work" = "")
Sys.setenv ("gtfs_data" = "/full/path/to/gtfs.zip")
# The following illustrate use with sample data bundled with package
Sys.setenv ("gtfs_home" = "Tempelhof")
Sys.setenv ("gtfs_work" = "Alexanderplatz")
Sys.setenv ("gtfs_data" = file.path (tempdir (), "vbb.zip"))
process_gtfs_local ()
# next available service from current system time:
go_home ()
}
Run the code above in your browser using DataLab