Running 'testthat.R' [6s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(tibbletime)
  
  Attaching package: 'tibbletime'
  
  The following object is masked from 'package:stats':
  
      filter
  
  > 
  > test_check("tibbletime")
  -- 1. Error: Can convert to monthly (@test_as_period.R#21)  --------------------
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: as_period(test_tbl_time, "monthly") at testthat/test_as_period.R:21
  2: as_period.tbl_time(test_tbl_time, "monthly")
  3: dplyr::mutate(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  4: mutate.tbl_time(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: mutate.tbl_df(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  10: mutate_impl(.data, dots)
  
  -- 2. Error: Can convert to monthly - end (@test_as_period.R#28)  --------------
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: as_period(test_tbl_time, "monthly", side = "end") at testthat/test_as_period.R:28
  2: as_period.tbl_time(test_tbl_time, "monthly", side = "end")
  3: dplyr::mutate(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  4: mutate.tbl_time(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: mutate.tbl_df(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  10: mutate_impl(.data, dots)
  
  -- 3. Error: Can convert to yearly (@test_as_period.R#35)  ---------------------
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: as_period(test_tbl_time, "yearly") at testthat/test_as_period.R:35
  2: as_period.tbl_time(test_tbl_time, "yearly")
  3: dplyr::mutate(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  4: mutate.tbl_time(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: mutate.tbl_df(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  10: mutate_impl(.data, dots)
  
  -- 4. Error: Can convert to yearly - end (@test_as_period.R#42)  ---------------
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: as_period(test_tbl_time, "yearly", side = "end") at testthat/test_as_period.R:42
  2: as_period.tbl_time(test_tbl_time, "yearly", side = "end")
  3: dplyr::mutate(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  4: mutate.tbl_time(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: mutate.tbl_df(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  10: mutate_impl(.data, dots)
  
  -- 5. Error: Include endpoints with side = 'start' includes last point (@test_as
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: as_period(test_tbl_time, "yearly", include_endpoints = TRUE) at testthat/test_as_period.R:49
  2: as_period.tbl_time(test_tbl_time, "yearly", include_endpoints = TRUE)
  3: dplyr::mutate(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  4: mutate.tbl_time(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: mutate.tbl_df(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  10: mutate_impl(.data, dots)
  
  -- 6. Error: Include endpoints with side = 'start' includes last point (@test_as
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: as_period(test_tbl_time, "yearly", side = "end", include_endpoints = TRUE) at testthat/test_as_period.R:57
  2: as_period.tbl_time(test_tbl_time, "yearly", side = "end", include_endpoints = TRUE)
  3: dplyr::mutate(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  4: mutate.tbl_time(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: mutate.tbl_df(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  10: mutate_impl(.data, dots)
  
  -- 7. Error: Groups are respected (@test_as_period.R#71)  ----------------------
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: as_period(test_tbl_time_g, "yearly") at testthat/test_as_period.R:71
  2: as_period.tbl_time(test_tbl_time_g, "yearly")
  3: dplyr::mutate(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  4: mutate.tbl_time(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: mutate.tbl_df(.tbl_time, .time_group = partition_index(!(!get_index_quo(.tbl_time)), 
         period, start_date))
  10: mutate_impl(.data, dots)
  
  -- 8. Error: Ceiling all Date/Datetime to yearly results in the same answer (@te
  ICU init failed: U_FILE_ACCESS_ERROR
  1: purrr::map_dfc(test_tbl_time, ~ceiling_index(.x, "yearly") %>% to_posixct_numeric) at testthat/test_ceiling_index.R:20
  2: map(.x, .f, ...)
  3: .f(.x[[i]], ...)
  4: ceiling_index(.x, "yearly") %>% to_posixct_numeric
  5: eval(lhs, parent, parent)
  6: eval(lhs, parent, parent)
  7: ceiling_index(.x, "yearly")
  8: ceiling_index.default(.x, "yearly")
  9: lubridate::ceiling_date
  10: getExportedValue(pkg, name)
  11: asNamespace(ns)
  12: getNamespace(ns)
  13: tryCatch(loadNamespace(name), error = function(e) stop(e))
  14: tryCatchList(expr, classes, parentenv, handlers)
  15: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  16: value[[3L]](cond)
  
  -- 9. Error: Ceiling works with hms (@test_ceiling_index.R#28)  ----------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: expect_equal(ceiling_index(hms_test$date, "12 hour"), rep(43200, 12) %>% hms::as.hms()) at testthat/test_ceiling_index.R:28
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: ceiling_index(hms_test$date, "12 hour")
  5: ceiling_index.hms(hms_test$date, "12 hour")
  6: ceiling_index(as.POSIXct(x), unit)
  7: ceiling_index.default(as.POSIXct(x), unit)
  8: lubridate::ceiling_date
  9: getExportedValue(pkg, name)
  10: asNamespace(ns)
  11: getNamespace(ns)
  12: tryCatch(loadNamespace(name), error = function(e) stop(e))
  13: tryCatchList(expr, classes, parentenv, handlers)
  14: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  15: value[[3L]](cond)
  
  -- 10. Error: Yearly collapse returns correct dates (@test_collapse_index.R#15) 
  ICU init failed: U_FILE_ACCESS_ERROR
  1: collapse_index(test_time$date, "yearly") at testthat/test_collapse_index.R:15
  2: partition_index(index, period, start_date)
  3: make_endpoints(index, period, start_date)
  4: make_endpoint_formula(index = index, period = period_clean, start_date = start_date)
  5: floor_index(start_date, period)
  6: floor_index.default(start_date, period)
  7: lubridate::floor_date
  8: getExportedValue(pkg, name)
  9: asNamespace(ns)
  10: getNamespace(ns)
  11: tryCatch(loadNamespace(name), error = function(e) stop(e))
  12: tryCatchList(expr, classes, parentenv, handlers)
  13: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  14: value[[3L]](cond)
  
  -- 11. Error: side = 'start' returns start of period (@test_collapse_index.R#21)
  ICU init failed: U_FILE_ACCESS_ERROR
  1: collapse_index(test_time$date, "yearly", side = "start") at testthat/test_collapse_index.R:21
  2: partition_index(index, period, start_date)
  3: make_endpoints(index, period, start_date)
  4: make_endpoint_formula(index = index, period = period_clean, start_date = start_date)
  5: floor_index(start_date, period)
  6: floor_index.default(start_date, period)
  7: lubridate::floor_date
  8: getExportedValue(pkg, name)
  9: asNamespace(ns)
  10: getNamespace(ns)
  11: tryCatch(loadNamespace(name), error = function(e) stop(e))
  12: tryCatchList(expr, classes, parentenv, handlers)
  13: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  14: value[[3L]](cond)
  
  -- 12. Error: Index vectors can be passed to the period argument (@test_collapse
  ICU init failed: U_FILE_ACCESS_ERROR
  1: create_series("2017-11-30" ~ "2017-12-03", "2 day", "Date", as_vector = TRUE) at testthat/test_collapse_index.R:27
  2: purrr::map(tf_list, ~list_to_datetime(dummy_index, .x, tz = tz))
  3: .f(.x[[i]], ...)
  4: list_to_datetime(dummy_index, .x, tz = tz)
  5: list_to_datetime.Date(dummy_index, .x, tz = tz)
  6: lubridate::make_date
  7: getExportedValue(pkg, name)
  8: asNamespace(ns)
  9: getNamespace(ns)
  10: tryCatch(loadNamespace(name), error = function(e) stop(e))
  11: tryCatchList(expr, classes, parentenv, handlers)
  12: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  13: value[[3L]](cond)
  
  -- 13. Error: Collapsing works on yearmon (@test_collapse_index.R#34)  ---------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: create_series(~"2017", "monthly", "yearmon") at testthat/test_collapse_index.R:34
  2: purrr::map(tf_list, ~list_to_datetime(dummy_index, .x, tz = tz))
  3: .f(.x[[i]], ...)
  4: list_to_datetime(dummy_index, .x, tz = tz)
  5: list_to_datetime.yearmon(dummy_index, .x, tz = tz)
  6: zoo::as.yearmon(list_to_datetime.Date(index, tf_side))
  7: list_to_datetime.Date(index, tf_side)
  8: lubridate::make_date
  9: getExportedValue(pkg, name)
  10: asNamespace(ns)
  11: getNamespace(ns)
  12: tryCatch(loadNamespace(name), error = function(e) stop(e))
  13: tryCatchList(expr, classes, parentenv, handlers)
  14: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  15: value[[3L]](cond)
  
  -- 14. Error: Collapsing works on yearqtr (@test_collapse_index.R#41)  ---------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: create_series(~"2017", "quarter", "yearqtr") at testthat/test_collapse_index.R:41
  2: assert_from_before_to(from, to)
  3: to_posixct_numeric(from)
  4: to_posixct_numeric.yearqtr(from)
  5: to_posixct_numeric(yearmon_to_POSIXct(index))
  6: yearmon_to_POSIXct(index)
  7: lubridate::make_datetime
  8: getExportedValue(pkg, name)
  9: asNamespace(ns)
  10: getNamespace(ns)
  11: tryCatch(loadNamespace(name), error = function(e) stop(e))
  12: tryCatchList(expr, classes, parentenv, handlers)
  13: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  14: value[[3L]](cond)
  
  -- 15. Error: Collapsing works on hms (@test_collapse_index.R#50)  -------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: expect_equal(collapse_index(ex$date, "minute", side = "start"), hms::hms(rep(43200, 
         60))) at testthat/test_collapse_index.R:50
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: collapse_index(ex$date, "minute", side = "start")
  5: partition_index(index, period, start_date)
  6: make_endpoints(index, period, start_date)
  7: make_endpoint_formula(index = index, period = period_clean, start_date = start_date)
  8: floor_index(start_date, period)
  9: floor_index.hms(start_date, period)
  10: floor_index(as.POSIXct(x), unit)
  11: floor_index.default(as.POSIXct(x), unit)
  12: lubridate::floor_date
  13: getExportedValue(pkg, name)
  14: asNamespace(ns)
  15: getNamespace(ns)
  16: tryCatch(loadNamespace(name), error = function(e) stop(e))
  17: tryCatchList(expr, classes, parentenv, handlers)
  18: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  19: value[[3L]](cond)
  
  -- 16. Error: Can create basic series (@test_create_series.R#10)  --------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: create_series(~"2013-01-01", "1 day") at testthat/test_create_series.R:10
  2: purrr::map(tf_list, ~list_to_datetime(dummy_index, .x, tz = tz))
  3: .f(.x[[i]], ...)
  4: list_to_datetime(dummy_index, .x, tz = tz)
  5: list_to_datetime.POSIXct(dummy_index, .x, tz = tz)
  6: lubridate::make_datetime
  7: getExportedValue(pkg, name)
  8: asNamespace(ns)
  9: getNamespace(ns)
  10: tryCatch(loadNamespace(name), error = function(e) stop(e))
  11: tryCatchList(expr, classes, parentenv, handlers)
  12: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  13: value[[3L]](cond)
  
  -- 17. Error: Can create series of different classes (@test_create_series.R#18) 
  ICU init failed: U_FILE_ACCESS_ERROR
  1: expect_equal(create_series(~"2013-01-01", "1 day", "Date"), as_tbl_time(tibble::tibble(date = as.Date("2013-01-01")), 
         date)) at testthat/test_create_series.R:18
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: create_series(~"2013-01-01", "1 day", "Date")
  5: purrr::map(tf_list, ~list_to_datetime(dummy_index, .x, tz = tz))
  6: .f(.x[[i]], ...)
  7: list_to_datetime(dummy_index, .x, tz = tz)
  8: list_to_datetime.Date(dummy_index, .x, tz = tz)
  9: lubridate::make_date
  10: getExportedValue(pkg, name)
  11: asNamespace(ns)
  12: getNamespace(ns)
  13: tryCatch(loadNamespace(name), error = function(e) stop(e))
  14: tryCatchList(expr, classes, parentenv, handlers)
  15: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  16: value[[3L]](cond)
  
  -- 18. Error: Can create vector series (@test_create_series.R#46)  -------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: create_series(~"2013-01-01", "1 day", as_vector = TRUE) at testthat/test_create_series.R:46
  2: purrr::map(tf_list, ~list_to_datetime(dummy_index, .x, tz = tz))
  3: .f(.x[[i]], ...)
  4: list_to_datetime(dummy_index, .x, tz = tz)
  5: list_to_datetime.POSIXct(dummy_index, .x, tz = tz)
  6: lubridate::make_datetime
  7: getExportedValue(pkg, name)
  8: asNamespace(ns)
  9: getNamespace(ns)
  10: tryCatch(loadNamespace(name), error = function(e) stop(e))
  11: tryCatchList(expr, classes, parentenv, handlers)
  12: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  13: value[[3L]](cond)
  
  -- 19. Error: Can alter time zone (@test_create_series.R#53)  ------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: create_series(~"2013-01-01", "1 day", as_vector = TRUE, tz = "EST") at testthat/test_create_series.R:53
  2: purrr::map(tf_list, ~list_to_datetime(dummy_index, .x, tz = tz))
  3: .f(.x[[i]], ...)
  4: list_to_datetime(dummy_index, .x, tz = tz)
  5: list_to_datetime.POSIXct(dummy_index, .x, tz = tz)
  6: lubridate::make_datetime
  7: getExportedValue(pkg, name)
  8: asNamespace(ns)
  9: getNamespace(ns)
  10: tryCatch(loadNamespace(name), error = function(e) stop(e))
  11: tryCatchList(expr, classes, parentenv, handlers)
  12: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  13: value[[3L]](cond)
  
  -- 20. Error: tbl_time class is retained (@test_filter_time.R#16)  -------------
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: filter_time(test_tbl_time, ~"2013") at testthat/test_filter_time.R:16
  2: filter_time.tbl_time(test_tbl_time, ~"2013")
  3: dplyr::filter(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  4: filter.tbl_time(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: filter.tbl_df(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  10: filter_impl(.data, quo)
  
  -- 21. Error: Filtering is expanded correctly (@test_filter_time.R#21)  --------
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: filter_time(test_tbl_time, ~"2013") at testthat/test_filter_time.R:21
  2: filter_time.tbl_time(test_tbl_time, ~"2013")
  3: dplyr::filter(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  4: filter.tbl_time(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: filter.tbl_df(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  10: filter_impl(.data, quo)
  
  -- 22. Error: Filtering is expanded correctly - double sided (@test_filter_time.
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: filter_time(test_tbl_time, "2013-01" ~ "2014-02") at testthat/test_filter_time.R:29
  2: filter_time.tbl_time(test_tbl_time, "2013-01" ~ "2014-02")
  3: dplyr::filter(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  4: filter.tbl_time(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: filter.tbl_df(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  10: filter_impl(.data, quo)
  
  -- 23. Error: Time filter works with POSIXct objects (@test_filter_time.R#38)  -
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: filter_time(test_tbl_time_posix, "2013-01-02 12:00:00" ~ "2014-02-01 14:01:01") at testthat/test_filter_time.R:38
  2: filter_time.tbl_time(test_tbl_time_posix, "2013-01-02 12:00:00" ~ "2014-02-01 14:01:01")
  3: dplyr::filter(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  4: filter.tbl_time(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: filter.tbl_df(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  10: filter_impl(.data, quo)
  
  -- 24. Error: Groups are respected (@test_filter_time.R#53)  -------------------
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: filter_time(test_tbl_time_g, ~"2013") at testthat/test_filter_time.R:53
  2: filter_time.tbl_time(test_tbl_time_g, ~"2013")
  3: dplyr::filter(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  4: filter.tbl_time(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  5: reconstruct(NextMethod(), copy_.data)
  6: reconstruct.tbl_time(NextMethod(), copy_.data)
  7: inherits(new, "grouped_df")
  8: NextMethod()
  9: filter.tbl_df(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  10: filter_impl(.data, quo)
  
  -- 25. Error: Time filter subsetting [~i] works (@test_filter_time.R#58)  ------
  Evaluation error: ICU init failed: U_FILE_ACCESS_ERROR.
  1: expect_equal(ncol(test_tbl_time[~"2013"]), 8L) at testthat/test_filter_time.R:58
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: ncol(test_tbl_time[~"2013"])
  5: test_tbl_time[~"2013"]
  6: `[.tbl_time`(test_tbl_time, ~"2013")
  7: filter_time(x, i)
  8: filter_time.tbl_time(x, i)
  9: dplyr::filter(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  10: filter.tbl_time(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  11: reconstruct(NextMethod(), copy_.data)
  12: reconstruct.tbl_time(NextMethod(), copy_.data)
  13: inherits(new, "grouped_df")
  14: NextMethod()
  15: filter.tbl_df(.tbl_time, {
         tf_list <- parse_time_formula(!(!index_quo), time_formula)
         from_to <- purrr::map(.x = tf_list, .f = ~list_to_datetime(!(!index_quo), .x, 
             tz = tz))
         from <- from_to[[1]]
         to <- from_to[[2]]
         assert_from_before_to(from, to)
         sorted_range_search(!(!index_quo), from, to)
     })
  16: filter_impl(.data, quo)
  
  -- 26. Error: Floor all Date/Datetime to yearly results in the same answer (@tes
  ICU init failed: U_FILE_ACCESS_ERROR
  1: purrr::map_dfc(test_tbl_time, ~floor_index(.x, "yearly") %>% to_posixct_numeric) at testthat/test_floor_index.R:20
  2: map(.x, .f, ...)
  3: .f(.x[[i]], ...)
  4: floor_index(.x, "yearly") %>% to_posixct_numeric
  5: eval(lhs, parent, parent)
  6: eval(lhs, parent, parent)
  7: floor_index(.x, "yearly")
  8: floor_index.default(.x, "yearly")
  9: lubridate::floor_date
  10: getExportedValue(pkg, name)
  11: asNamespace(ns)
  12: getNamespace(ns)
  13: tryCatch(loadNamespace(name), error = function(e) stop(e))
  14: tryCatchList(expr, classes, parentenv, handlers)
  15: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  16: value[[3L]](cond)
  
  -- 27. Error: Floor works with hms (@test_floor_index.R#28)  -------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: expect_equal(floor_index(hms_test$date, "12 hour"), c(rep(0, 11), 43200) %>% hms::as.hms()) at testthat/test_floor_index.R:28
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: floor_index(hms_test$date, "12 hour")
  5: floor_index.hms(hms_test$date, "12 hour")
  6: floor_index(as.POSIXct(x), unit)
  7: floor_index.default(as.POSIXct(x), unit)
  8: lubridate::floor_date
  9: getExportedValue(pkg, name)
  10: asNamespace(ns)
  11: getNamespace(ns)
  12: tryCatch(loadNamespace(name), error = function(e) stop(e))
  13: tryCatchList(expr, classes, parentenv, handlers)
  14: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  15: value[[3L]](cond)
  
  -- 28. Error: Basic parsing (@test_parse_time_formula.R#12)  -------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: expect_equal(parse_time_formula(obj_Date, ~"2013"), list(list(y = 2013, m = 1, d = 1), 
         list(y = 2013, m = 12, d = c(Dec = 31)))) at testthat/test_parse_time_formula.R:12
  2: quasi_label(enquo(object), label)
  3: eval_bare(get_expr(quo), get_env(quo))
  4: parse_time_formula(obj_Date, ~"2013")
  5: add_time_defaults(index, tf[[2]], "rhs")
  6: lubridate::make_date
  7: getExportedValue(pkg, name)
  8: asNamespace(ns)
  9: getNamespace(ns)
  10: tryCatch(loadNamespace(name), error = function(e) stop(e))
  11: tryCatchList(expr, classes, parentenv, handlers)
  12: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  13: value[[3L]](cond)
  
  == testthat results  ===========================================================
  OK: 79 SKIPPED: 0 FAILED: 28
  1. Error: Can convert to monthly (@test_as_period.R#21) 
  2. Error: Can convert to monthly - end (@test_as_period.R#28) 
  3. Error: Can convert to yearly (@test_as_period.R#35) 
  4. Error: Can convert to yearly - end (@test_as_period.R#42) 
  5. Error: Include endpoints with side = 'start' includes last point (@test_as_period.R#49) 
  6. Error: Include endpoints with side = 'start' includes last point (@test_as_period.R#57) 
  7. Error: Groups are respected (@test_as_period.R#71) 
  8. Error: Ceiling all Date/Datetime to yearly results in the same answer (@test_ceiling_index.R#20) 
  9. Error: Ceiling works with hms (@test_ceiling_index.R#28) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted