Running ‘spelling.R’
  Running ‘testthat.R’ [28s/34s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(rlang)
  > library(tibble)
  > library(lubridate)
  
  Attaching package: 'lubridate'
  
  The following object is masked from 'package:base':
  
      date
  
  > library(testthat)
  
  Attaching package: 'testthat'
  
  The following objects are masked from 'package:rlang':
  
      is_false, is_null, is_true
  
  > library(tsibble)
  
  Attaching package: 'tsibble'
  
  The following objects are masked from 'package:lubridate':
  
      interval, new_interval
  
  The following object is masked from 'package:stats':
  
      filter
  
  > 
  > set.seed(2018)
  > test_check("tsibble")
  ── 1. Failure: class: POSIXct (@test-filter-index.R#40)  ───────────────────────
  start(pedestrian$Date_Time, y) not equal to ymd_hm(...).
  4/4 mismatches (average diff: 1 hours)
  [1] 2016-01-01 01:00:00 - 2016-01-01 00:00:00 == 1 hours
  [2] 2016-10-01 01:00:00 - 2016-10-01 00:00:00 == 1 hours
  [3] 2016-12-09 01:00:00 - 2016-12-09 00:00:00 == 1 hours
  [4] 2016-12-09 11:00:00 - 2016-12-09 10:00:00 == 1 hours
  
  ── 2. Failure: class: POSIXct (@test-filter-index.R#48)  ───────────────────────
  end(pedestrian$Date_Time, y) not equal to ymd_hms(...).
  4/4 mismatches (average diff: 1 hours)
  [1] 2017-01-01 01:00:00 - 2017-01-01 00:00:00 == 1 hours
  [2] 2016-11-01 01:00:00 - 2016-11-01 00:00:00 == 1 hours
  [3] 2016-12-10 01:00:00 - 2016-12-10 00:00:00 == 1 hours
  [4] 2016-12-09 11:00:01 - 2016-12-09 10:00:01 == 1 hours
  
  ── 3. Failure: filter_index() (@test-filter-index.R#68)  ───────────────────────
  `%>%`(...) not identical to `%>%`(...).
  Different number of rows
  
  ── 4. Failure: filter_index() (@test-filter-index.R#79)  ───────────────────────
  pedestrian %>% filter_index("2015-03-23 10" ~ "2015-10-31 12") not identical to `%>%`(...).
  Different number of rows
  
  ── 5. Failure: filter_index() (@test-filter-index.R#100)  ──────────────────────
  pedestrian %>% filter_index(~"2015") not identical to pedestrian %>% filter(year(Date_Time) == 2015).
  Different number of rows
  
  ── 6. Failure: filter_index() (@test-filter-index.R#106)  ──────────────────────
  pedestrian %>% filter_index("2015" ~ "2016") not identical to `pedestrian`.
  Different number of rows
  
  A tsibble: 10 x 2 [10µs] <?>══ testthat results  ═══════════════════════════════════════════════════════════
  OK: 681 SKIPPED: 0 FAILED: 6
  1. Failure: class: POSIXct (@test-filter-index.R#40) 
  2. Failure: class: POSIXct (@test-filter-index.R#48) 
  3. Failure: filter_index() (@test-filter-index.R#68) 
  4. Failure: filter_index() (@test-filter-index.R#79) 
  5. Failure: filter_index() (@test-filter-index.R#100) 
  6. Failure: filter_index() (@test-filter-index.R#106) 
  
  Error: testthat unit tests failed
  Execution halted