我注意到你已經找到自己的方式到我development package, gtfsway。特別是,在issue 1的例子給出的包是如何工作的例子,它的方式解析實時飼料
devtools::install_github("SymbolixAU/gtfsway")
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)
## The results will obviously change depending on when you read the data
lst[[32]]
# $dt_trip_info
# trip_id start_time start_date route_id
# 1: 8959814-SBL 16_17-SBL_FUL-Friday-04 12:21:00 20170303 709-739
#
# $dt_stop_time_update
# stop_sequence stop_id arrival_time arrival_delay departure_time departure_delay
# 1: 1 318944 1488504104 -3556 1488507660 0
# 2: 2 318946 1488507741 21 1488507741 21
# 3: 3 300444 1488507903 3 1488507903 3
# 4: 4 300058 1488507977 17 1488507977 17
# 5: 5 300059 1488508022 2 1488508022 2
# 6: 6 300060 1488508094 -46 1488508094 -46
# 7: 7 300061 1488508115 -25 1488508115 -25
# 8: 8 300062 1488508148 -52 1488508148 -52
# 9: 9 300063 1488508175 -85 1488508175 -85
# 10: 10 300005 1488508299 -141 1488508299 -141
# 11: 11 300053 1488508398 -102 1488508398 -102
# 12: 12 300054 1488508458 -102 1488508458 -102
# 13: 13 300056 1488508638 -102 1488508638 -102
# 14: 14 300055 1488508758 -102 1488508758 -102
# 15: 15 300272 1488508998 -102 1488508998 -102
# 16: 16 319160 1488509058 -102 1488509058 -102
我接受捐款包裝&建議,如果您有任何。
另一種選擇是使用GTFSrDB或類似的方法對結果進行數據庫化。 https://github.com/mattwigway/gtfsrdb。然後通過您選擇的數據庫庫進行連接。 –