
The goal of trainR is to provide a simple interface to
the National Rail Enquiries (NRE) systems. There are few data feeds
available, the simplest of them is Darwin, which provides real-time
arrival and departure predictions, platform numbers, delay estimates,
schedule changes and cancellations. Other data feeds provide historical
data, Historic Service Performance (HSP), and much more.
trainR simplifies the data retrieval, so that the users can
focus on their analyses. For more details visit https://www.nationalrail.co.uk/46391.aspx.
You can install the released version of trainR from CRAN with:
install.packages("trainR")And the development version from GitHub with:
# install.packages("devtools")
devtools::install_github("villegar/trainR")Before starting to retrieve data from the NRE data feeds, you must obtain an access token. Visit the following website for details: http://realtime.nationalrail.co.uk/OpenLDBWSRegistration/
Once you have received your access token, you have to store it in the
.Renviron file; this can be done by executing the following
command:
trainR::set_token()This will open a text file, .Renviron, add a new line at
the end (as follows):
NRE="<token>"<token> should be replaced by the access token
obtained from the NRE. Save the changes and restart your R session.
You only need to perform this configuration once.
Load trainR to your working environment:
library(trainR)Generated on 2021-01-16 19:59:12.
rdg_arr <- trainR::GetArrBoardWithDetailsRequest("RDG")
print(rdg_arr)
#> Reading (RDG) Station Board on 2021-01-16 19:59:13
#> Time   From                                    Plat  Expected
#> 19:58  Great Malvern                           10A   19:55
#> 19:59  Basingstoke                             2     On time
#> 20:01  Didcot Parkway                          15    On time
#> 20:08  London Paddington                       8     On time
#> 20:11  London Waterloo                         6     On time
#> 20:13  London Paddington                       14    On time
#> 20:16  London Paddington                       9     On time
#> 20:21  Bedwyn                                  11    On time
#> 20:27  Basingstoke                             2     On time
#> Time   From                                    Plat  Expected
#> 20:13  Swindon (Wilts)                         BUS   On timeGenerated on 2021-01-16 19:59:13.
rdg_dep <- trainR::GetDepBoardWithDetailsRequest("RDG")
print(rdg_dep)
#> Reading (RDG) Station Board on 2021-01-16 19:59:13
#> Time   To                                      Plat  Expected
#> 20:00  London Paddington                       10A   On time
#> 20:01  Redhill                                 6     On time
#> 20:10  Swansea                                 8     On time
#> 20:12  London Waterloo                         4     On time
#> 20:14  Newbury                                 1     On time
#> 20:15  Ealing Broadway                         15    On time
#> 20:15  Manchester Piccadilly                   13    On time
#> 20:19  Great Malvern                           9     On time
#> 20:22  Ealing Broadway                         14    On time
#> Time   To                                      Plat  Expected
#> 20:20  Swindon (Wilts)                         BUS   On timeAccess to the data feeds it is only possible thanks to the National Rail Enquiries. This package is just a tool to facilitate access to the data. For more information about the available data feeds, visit https://www.nationalrail.co.uk.
