Running ‘testthat.R’ [27s/47s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(bikedata)
  Data for London, U.K. powered by TfL Open Data:
    Contains OS data Ⓒ Crown copyright and database rights 2016
  Data for New York City provided and owned by:
    NYC Bike Share, LLC and Jersey City Bike Share, LLC ("Bikeshare")
    see https://www.citibikenyc.com/data-sharing-policy
  Data for Washington DC (Captialbikeshare), Chiago (Divvybikes) and Boston (Hubway)
    provided and owned by Motivate International Inc.
    see https://www.capitalbikeshare.com/data-license-agreement
    and https://www.divvybikes.com/data-license-agreement
    and https://www.thehubway.com/data-license-agreement
  > 
  > test_check("bikedata")
  ── 1. Failure: dl_bikedata dc (@test-download-data.R#58)  ──────────────────────
  `dl_bikedata(city = "dc", data_dir = tempdir(), dates = d)` produced unexpected messages.
  Expected match: All data files already exist
  Actual values:
  * There are no dc files for those dates
  
  
  ── 2. Failure: dl_bikedata dc (@test-download-data.R#58)  ──────────────────────
  `dl_bikedata(city = "dc", data_dir = tempdir(), dates = d)` produced unexpected messages.
  Expected match: All data files already exist
  Actual values:
  * There are no dc files for those dates
  
  
  ── 3. Failure: dl_bikedata dc (@test-download-data.R#58)  ──────────────────────
  `dl_bikedata(city = "dc", data_dir = tempdir(), dates = d)` produced unexpected messages.
  Expected match: All data files already exist
  Actual values:
  * There are no dc files for those dates
  
  
  ── 4. Failure: dl_bikedata dc (@test-download-data.R#58)  ──────────────────────
  `dl_bikedata(city = "dc", data_dir = tempdir(), dates = d)` produced unexpected messages.
  Expected match: All data files already exist
  Actual values:
  * There are no dc files for those dates
  
  
  ── 5. Failure: dl_bikedata dc (@test-download-data.R#58)  ──────────────────────
  `dl_bikedata(city = "dc", data_dir = tempdir(), dates = d)` produced unexpected messages.
  Expected match: All data files already exist
  Actual values:
  * There are no dc files for those dates
  
  
  ── 6. Failure: dl_bikedata dc (@test-download-data.R#58)  ──────────────────────
  `dl_bikedata(city = "dc", data_dir = tempdir(), dates = d)` produced unexpected messages.
  Expected match: All data files already exist
  Actual values:
  * There are no dc files for those dates
  
  
  ── 7. Failure: dl_bikedata dc (@test-download-data.R#58)  ──────────────────────
  `dl_bikedata(city = "dc", data_dir = tempdir(), dates = d)` produced unexpected messages.
  Expected match: All data files already exist
  Actual values:
  * There are no dc files for those dates
  
  
  ── 8. Failure: dl_bikedata dc (@test-download-data.R#58)  ──────────────────────
  `dl_bikedata(city = "dc", data_dir = tempdir(), dates = d)` produced unexpected messages.
  Expected match: All data files already exist
  Actual values:
  * There are no dc files for those dates
  
  
  ── 9. Failure: dl_bikedata dc (@test-download-data.R#58)  ──────────────────────
  `dl_bikedata(city = "dc", data_dir = tempdir(), dates = d)` produced unexpected messages.
  Expected match: All data files already exist
  Actual values:
  * There are no dc files for those dates
  
  
  ── 10. Failure: dl_bikedata dc (@test-download-data.R#58)  ─────────────────────
  `dl_bikedata(city = "dc", data_dir = tempdir(), dates = d)` produced unexpected messages.
  Expected match: All data files already exist
  Actual values:
  * There are no dc files for those dates
  
  
    adding: tmp/RtmpIQ0pky/Divvy_Trips_sample/ (stored 0%)
    adding: tmp/RtmpIQ0pky/Divvy_Trips_sample/Divvy_Trips_sample.csv (deflated 79%)
    adding: tmp/RtmpIQ0pky/Divvy_Trips_sample/Divvy_Stations.csv (deflated 68%)
    adding: tmp/RtmpIQ0pky/201604-hubway-tripdata.csv (deflated 84%)
    adding: tmp/RtmpIQ0pky/2017-Q1-Trips-History-Data.csv (deflated 78%)
    adding: tmp/RtmpIQ0pky/la_metro_gbfs_trips_Q1_2017.csv (deflated 85%)
    adding: tmp/RtmpIQ0pky/01aJourneyDataExtract10Jan16-23Jan16.csv (deflated 74%)
    adding: tmp/RtmpIQ0pky/201612-citibike-tripdata.csv (deflated 74%)
  ── 11. Error: write and store data (@test-store-data.R#44)  ────────────────────
  Index out of bounds: [index='id'].
  1: expect_silent(n <- store_bikedata(data_dir = tempdir(), bikedb = bikedb, quiet = TRUE)) at testthat/test-store-data.R:44
  2: quasi_capture(enquo(object), evaluate_promise)
  3: capture(act$val <- eval_bare(get_expr(quo), get_env(quo)))
  4: withr::with_output_sink(temp, withCallingHandlers(withVisible(code), warning = handle_warning, 
         message = handle_message))
  5: force(code)
  6: withCallingHandlers(withVisible(code), warning = handle_warning, message = handle_message)
  7: withVisible(code)
  8: eval_bare(get_expr(quo), get_env(quo))
  9: store_bikedata(data_dir = tempdir(), bikedb = bikedb, quiet = TRUE)
  10: rcpp_import_stn_df(bikedb, lo_stns, "lo")
  
  ══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 129 SKIPPED: 1 FAILED: 11
  1. Failure: dl_bikedata dc (@test-download-data.R#58) 
  2. Failure: dl_bikedata dc (@test-download-data.R#58) 
  3. Failure: dl_bikedata dc (@test-download-data.R#58) 
  4. Failure: dl_bikedata dc (@test-download-data.R#58) 
  5. Failure: dl_bikedata dc (@test-download-data.R#58) 
  6. Failure: dl_bikedata dc (@test-download-data.R#58) 
  7. Failure: dl_bikedata dc (@test-download-data.R#58) 
  8. Failure: dl_bikedata dc (@test-download-data.R#58) 
  9. Failure: dl_bikedata dc (@test-download-data.R#58) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted