Running 'testthat.R' [5s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(padr)
  > 
  > test_check("padr")
  -- 1. Error: (unknown) (@test_check_date_variables.R#1)  -----------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_check_date_variables.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  -- 2. Error: (unknown) (@test_closest_weekday.R#1)  ----------------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_closest_weekday.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  -- 3. Error: (unknown) (@test_fill_functions.R#1)  -----------------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_fill_functions.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  -- 4. Error: (unknown) (@test_formatting_funcs.R#101)  -------------------------
  ICU init failed: U_FILE_ACCESS_ERROR
  1: lubridate::ymd at testthat/test_formatting_funcs.R:101
  2: getExportedValue(pkg, name)
  3: asNamespace(ns)
  4: getNamespace(ns)
  5: tryCatch(loadNamespace(name), error = function(e) stop(e))
  6: tryCatchList(expr, classes, parentenv, handlers)
  7: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  8: value[[3L]](cond)
  
  -- 5. Error: (unknown) (@test_get_interval.R#1)  -------------------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_get_interval.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  -- 6. Error: (unknown) (@test_helpers.R#1)  ------------------------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_helpers.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  -- 7. Error: (unknown) (@test_pad.R#1)  ----------------------------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_pad.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  -- 8. Error: pad_cust_group_span (@test_pad_cust.R#36)  ------------------------
  could not find function "data_frame"
  1: .handleSimpleError(function (e) 
     {
         handled <<- TRUE
         test_error <<- e
         options(expressions = expressions_opt_new)
         on.exit(options(expressions = expressions_opt), add = TRUE)
         e$expectation_calls <- frame_calls(11, 2)
         test_error <<- e
         register_expectation(e)
         e$handled <- TRUE
         test_error <<- e
     }, "could not find function \"data_frame\"", quote(data_frame(date = rep(sp, 2), 
         grp = rep(c("a", "b"), each = 3), val = c(1, NA, 1, 1, NA, 1)))) at testthat/test_pad_cust.R:36
  2: eval(code, test_env)
  
  -- 9. Error: (unknown) (@test_pad_int.R#1)  ------------------------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_pad_int.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  -- 10. Error: (unknown) (@test_span.R#1)  --------------------------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_span.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  -- 11. Error: (unknown) (@test_thicken.R#1)  -----------------------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_thicken.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  -- 12. Error: (unknown) (@test_thicken_cust.R#1)  ------------------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_thicken_cust.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  -- 13. Error: (unknown) (@test_thicken_helpers.R#1)  ---------------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_thicken_helpers.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  -- 14. Error: (unknown) (@test_thicken_integration.R#1)  -----------------------
  package or namespace load failed for 'lubridate' in inDL(x, as.logical(local), as.logical(now), ...):
   ICU init failed: U_FILE_ACCESS_ERROR
  1: source("library.R") at testthat/test_thicken_integration.R:1
  2: withVisible(eval(ei, envir))
  3: eval(ei, envir)
  4: eval(ei, envir)
  5: suppressMessages(library(lubridate))
  6: withCallingHandlers(expr, message = function(c) invokeRestart("muffleMessage"))
  7: library(lubridate)
  8: tryCatch({
         attr(package, "LibPath") <- which.lib.loc
         ns <- loadNamespace(package, lib.loc)
         env <- attachNamespace(ns, pos = pos, deps)
     }, error = function(e) {
         P <- if (!is.null(cc <- conditionCall(e))) 
             paste(" in", deparse(cc)[1L])
         else ""
         msg <- gettextf("package or namespace load failed for %s%s:\n %s", sQuote(package), 
             P, conditionMessage(e))
         if (logical.return) 
             message(paste("Error:", msg), domain = NA)
         else stop(msg, call. = FALSE, domain = NA)
     })
  9: tryCatchList(expr, classes, parentenv, handlers)
  10: tryCatchOne(expr, names, parentenv, handlers[[1L]])
  11: value[[3L]](cond)
  12: stop(msg, call. = FALSE, domain = NA)
  
  == testthat results  ===========================================================
  OK: 157 SKIPPED: 1 FAILED: 14
  1. Error: (unknown) (@test_check_date_variables.R#1) 
  2. Error: (unknown) (@test_closest_weekday.R#1) 
  3. Error: (unknown) (@test_fill_functions.R#1) 
  4. Error: (unknown) (@test_formatting_funcs.R#101) 
  5. Error: (unknown) (@test_get_interval.R#1) 
  6. Error: (unknown) (@test_helpers.R#1) 
  7. Error: (unknown) (@test_pad.R#1) 
  8. Error: pad_cust_group_span (@test_pad_cust.R#36) 
  9. Error: (unknown) (@test_pad_int.R#1) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted