我正尝试获取有关到达澳大利亚布里斯班中央火车站(id = 600016 ... 600024)的火车的几个星期的历史火车性能(延迟)数据,以进行研究。我找到了由SymbolixAU开发的名为gtfsway的程序包和一些简短的code,但我不知道如何指定日期和电台ID。
我是GTFS的新手,感谢您的帮助。
library(gtfsway)
url <- "https://gtfsrt.api.translink.com.au/Feed/SEQ"
response <- httr::GET(url)
FeedMessage <- gtfs_realtime(response)
## the function gtfs_tripUpdates() extracts the 'trip_update' feed
lst <- gtfs_tripUpdates(FeedMessage)