Running 'testthat.R' [5s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(skimr)
  
  Attaching package: 'skimr'
  
  The following object is masked from 'package:testthat':
  
      matches
  
  > 
  > test_check("skimr")
  -- 1. Error: (unknown) (@test-dplyr.R#3)  --------------------------------------
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(iris) at testthat/test-dplyr.R:3
  2: skim.data.frame(iris)
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 2. Error: Formatting options change printed output (@test-formats.R#53)  ----
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(mtcars) at testthat/test-formats.R:53
  2: skim.data.frame(mtcars)
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 3. Error: A class with an empty function list returns nothing (@test-function
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(iris) at testthat/test-functions.R:142
  2: skim.data.frame(iris)
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 4. Error: Skimming a data frame works as expected (@test-skim.R#4)  ---------
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(chickwts) at testthat/test-skim.R:4
  2: skim.data.frame(chickwts)
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 5. Error: Using skim_tee returns the object (@test-skim.R#36)  --------------
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: capture.output(skim_object <- skim_tee(chickwts)) at testthat/test-skim.R:36
  2: evalVis(expr)
  3: withVisible(eval(expr, pf))
  4: eval(expr, pf)
  5: eval(expr, pf)
  6: skim_tee(chickwts)
  7: print(skim(.data))
  8: skim(.data)
  9: skim.data.frame(.data)
  10: purrr::map(.data[selected], skim_v)
  11: .f(.x[[i]], ...)
  12: purrr::map(funs, ~.x(x))
  13: .f(.x[[i]], ...)
  14: .x(x)
  15: eval_tidy(call, mask)
  16: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 6. Error: Using skim_tee prints out the object (@test-skim.R#41)  -----------
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: expect_output(skim_tee(chickwts), "Skim summary statistics") at testthat/test-skim.R:41
  2: quasi_capture(enquo(object), capture_output, label = label)
  3: capture(act$val <- eval_bare(get_expr(quo), get_env(quo)))
  4: capture_output_lines(code, print, width = width)
  5: eval_with_output(code, print = print, width = width)
  6: withr::with_output_sink(temp, withVisible(code))
  7: force(code)
  8: withVisible(code)
  9: eval_bare(get_expr(quo), get_env(quo))
  10: skim_tee(chickwts)
  11: print(skim(.data))
  12: skim(.data)
  13: skim.data.frame(.data)
  14: purrr::map(.data[selected], skim_v)
  15: .f(.x[[i]], ...)
  16: purrr::map(funs, ~.x(x))
  17: .f(.x[[i]], ...)
  18: .x(x)
  19: eval_tidy(call, mask)
  20: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 7. Error: Skimming a grouped data frame works as expected (@test-skim.R#50)  
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: dplyr::group_by(mtcars, cyl, gear) %>% skim() at testthat/test-skim.R:50
  2: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  3: eval(quote(`_fseq`(`_lhs`)), env, env)
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: `_fseq`(`_lhs`)
  6: freduce(value, `_function_list`)
  7: withVisible(function_list[[k]](value))
  8: function_list[[k]](value)
  9: skim(.)
  10: skim.grouped_df(.)
  ...
  13: eval_tidy(args[[j]], mask)
  14: skim(., ...)
  15: skim.data.frame(., ...)
  16: purrr::map(.data[selected], skim_v)
  17: .f(.x[[i]], ...)
  18: purrr::map(funs, ~.x(x))
  19: .f(.x[[i]], ...)
  20: .x(x)
  21: eval_tidy(call, mask)
  22: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 8. Error: skim_to_wide works as expected. (@test-skim.R#80)  ----------------
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim_to_wide(iris) at testthat/test-skim.R:80
  2: skim(x)
  3: skim.data.frame(x)
  4: purrr::map(.data[selected], skim_v)
  5: .f(.x[[i]], ...)
  6: purrr::map(funs, ~.x(x))
  7: .f(.x[[i]], ...)
  8: .x(x)
  9: eval_tidy(call, mask)
  10: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 9. Error: skim_to_list works as expected (@test-skim.R#92)  -----------------
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim_to_list(chickwts) at testthat/test-skim.R:92
  2: skim(x, ...)
  3: skim.data.frame(x, ...)
  4: purrr::map(.data[selected], skim_v)
  5: .f(.x[[i]], ...)
  6: purrr::map(funs, ~.x(x))
  7: .f(.x[[i]], ...)
  8: .x(x)
  9: eval_tidy(call, mask)
  10: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 10. Error: skim_to_list works with grouped data (@test-skim.R#105)  ---------
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim_to_list(xg) at testthat/test-skim.R:105
  2: skim(x, ...)
  3: skim.grouped_df(x, ...)
  4: dplyr::do(.data, skim(., ...))
  5: do.grouped_df(.data, skim(., ...))
  6: eval_tidy(args[[j]], mask)
  7: skim(., ...)
  8: skim.data.frame(., ...)
  9: purrr::map(.data[selected], skim_v)
  10: .f(.x[[i]], ...)
  11: purrr::map(funs, ~.x(x))
  12: .f(.x[[i]], ...)
  13: .x(x)
  14: eval_tidy(call, mask)
  15: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 11. Error: Skimming a vector works as expected (@test-skim.R#111)  ----------
  no applicable method for 'mean' applied to an object of class "ts"
  1: skim(lynx) at testthat/test-skim.R:111
  2: skim.default(lynx)
  3: skim_v(.data)
  4: purrr::map(funs, ~.x(x))
  5: .f(.x[[i]], ...)
  6: .x(x)
  7: eval_tidy(call, mask)
  8: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 12. Error: Skimming a column of a data frame works as expected (@test-skim.R#
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(chickwts$weight) at testthat/test-skim.R:132
  2: skim.default(chickwts$weight)
  3: skim_v(.data)
  4: purrr::map(funs, ~.x(x))
  5: .f(.x[[i]], ...)
  6: .x(x)
  7: eval_tidy(call, mask)
  8: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 13. Error: Skimming a data frame with selected columns works as expected (@te
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(chickwts, weight) at testthat/test-skim.R:156
  2: skim.data.frame(chickwts, weight)
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 14. Error: Tidyselect helpers work as expected (@test-skim.R#203)  ----------
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(iris, starts_with("Sepal")) at testthat/test-skim.R:203
  2: skim.data.frame(iris, starts_with("Sepal"))
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 15. Error: Skimming a grouped df works as expected selecting two columns (@te
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: dplyr::group_by(mtcars, cyl, gear) %>% skim(mpg, disp) at testthat/test-skim.R:228
  2: withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  3: eval(quote(`_fseq`(`_lhs`)), env, env)
  4: eval(quote(`_fseq`(`_lhs`)), env, env)
  5: `_fseq`(`_lhs`)
  6: freduce(value, `_function_list`)
  7: withVisible(function_list[[k]](value))
  8: function_list[[k]](value)
  9: skim(., mpg, disp)
  10: skim.grouped_df(., mpg, disp)
  ...
  13: eval_tidy(args[[j]], mask)
  14: skim(., ...)
  15: skim.data.frame(., ...)
  16: purrr::map(.data[selected], skim_v)
  17: .f(.x[[i]], ...)
  18: purrr::map(funs, ~.x(x))
  19: .f(.x[[i]], ...)
  20: .x(x)
  21: eval_tidy(call, mask)
  22: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 16. Error: Skim prints a header for the entire output and each type (@test-sk
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(iris) at testthat/test-skim_print.R:4
  2: skim.data.frame(iris)
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 17. Error: Skim prints a special header for grouped data frames (@test-skim_p
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(dplyr::group_by(iris, Species)) at testthat/test-skim_print.R:17
  2: skim.grouped_df(dplyr::group_by(iris, Species))
  3: dplyr::do(.data, skim(., ...))
  4: do.grouped_df(.data, skim(., ...))
  5: eval_tidy(args[[j]], mask)
  6: skim(., ...)
  7: skim.data.frame(., ...)
  8: purrr::map(.data[selected], skim_v)
  9: .f(.x[[i]], ...)
  10: purrr::map(funs, ~.x(x))
  11: .f(.x[[i]], ...)
  12: .x(x)
  13: eval_tidy(call, mask)
  14: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 18. Error: Skim prints a special header for vectors (@test-skim_print.R#24)  
  no applicable method for 'mean' applied to an object of class "ts"
  1: skim(lynx) at testthat/test-skim_print.R:24
  2: skim.default(lynx)
  3: skim_v(.data)
  4: purrr::map(funs, ~.x(x))
  5: .f(.x[[i]], ...)
  6: .x(x)
  7: eval_tidy(call, mask)
  8: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 19. Error: Skim collapses counts and other multivalue stats into one cell (@t
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(iris) at testthat/test-skim_print.R:32
  2: skim.data.frame(iris)
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 20. Error: Skim aligns numeric vectors at the decimal point by default (@test
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(mtcars) at testthat/test-skim_print.R:37
  2: skim.data.frame(mtcars)
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 21. Error: Skimr kable prints as expected, 64-bit (@test-skim_print.R#52)  --
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(iris) at testthat/test-skim_print.R:52
  2: skim.data.frame(iris)
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 22. Error: Pander warns on windows and drops histograms (@test-skim_print.R#1
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: expect_warning(input <- utils::capture.output(skim(chickwts) %>% pander())) at testthat/test-skim_print.R:189
  2: quasi_capture(enquo(object), capture_warnings, label = label)
  3: capture(act$val <- eval_bare(get_expr(quo), get_env(quo)))
  4: withCallingHandlers(code, warning = function(condition) {
         out$push(condition)
         invokeRestart("muffleWarning")
     })
  5: eval_bare(get_expr(quo), get_env(quo))
  6: utils::capture.output(skim(chickwts) %>% pander())
  7: evalVis(expr)
  8: withVisible(eval(expr, pf))
  9: eval(expr, pf)
  10: eval(expr, pf)
  ...
  13: eval(lhs, parent, parent)
  14: skim(chickwts)
  15: skim.data.frame(chickwts)
  16: purrr::map(.data[selected], skim_v)
  17: .f(.x[[i]], ...)
  18: purrr::map(funs, ~.x(x))
  19: .f(.x[[i]], ...)
  20: .x(x)
  21: eval_tidy(call, mask)
  22: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 23. Error: skim_v returns expected response for numeric vectors (@test-skim_v
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(mtcars$mpg) at testthat/test-skim_v.R:5
  2: skim.default(mtcars$mpg)
  3: skim_v(.data)
  4: purrr::map(funs, ~.x(x))
  5: .f(.x[[i]], ...)
  6: .x(x)
  7: eval_tidy(call, mask)
  8: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 24. Error: skim_v handles numeric vectors with NAs and extreme numbers (@test
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skimr:::skim_v(patho) at testthat/test-skim_v.R:83
  2: purrr::map(funs, ~.x(x))
  3: .f(.x[[i]], ...)
  4: .x(x)
  5: eval_tidy(call, mask)
  6: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 25. Error: skim_v returns expected response for logical vectors (@test-skim_v
  no applicable method for 'mean' applied to an object of class "logical"
  1: skimr:::skim_v(dat$log_col) at testthat/test-skim_v.R:115
  2: purrr::map(funs, ~.x(x))
  3: .f(.x[[i]], ...)
  4: .x(x)
  5: eval_tidy(call, mask)
  6: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 26. Error: skim_v returns expected response for logical vectors (@test-skim_v
  no applicable method for 'mean' applied to an object of class "logical"
  1: skimr:::skim_v(dat$log_col) at testthat/test-skim_v.R:131
  2: purrr::map(funs, ~.x(x))
  3: .f(.x[[i]], ...)
  4: .x(x)
  5: eval_tidy(call, mask)
  6: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 27. Error: skim_v returns expected response for ts vectors (@test-skim_v.R#23
  no applicable method for 'mean' applied to an object of class "ts"
  1: skimr:::skim_v(freeny$y) at testthat/test-skim_v.R:232
  2: purrr::map(funs, ~.x(x))
  3: .f(.x[[i]], ...)
  4: .x(x)
  5: eval_tidy(call, mask)
  6: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 28. Error: numeric skim is calculated correctly when x is all NAs. (@test-ski
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(x) at testthat/test-skim_v.R:334
  2: skim.default(x)
  3: skim_v(.data)
  4: purrr::map(funs, ~.x(x))
  5: .f(.x[[i]], ...)
  6: .x(x)
  7: eval_tidy(call, mask)
  8: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 29. Error: numeric skim is calculated correctly when x is all zeores or NAs. 
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(x) at testthat/test-skim_v.R:357
  2: skim.default(x)
  3: skim_v(.data)
  4: purrr::map(funs, ~.x(x))
  5: .f(.x[[i]], ...)
  6: .x(x)
  7: eval_tidy(call, mask)
  8: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 30. Error: Skimming with non-finite values works (@test-skim_v.R#380)  ------
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: expect_length(skim(c(x = c(0, 1, NA))), 6) at testthat/test-skim_v.R:380
  2: quasi_label(enquo(object))
  3: eval_bare(get_expr(quo), get_env(quo))
  4: skim(c(x = c(0, 1, NA)))
  5: skim.default(c(x = c(0, 1, NA)))
  6: skim_v(.data)
  7: purrr::map(funs, ~.x(x))
  8: .f(.x[[i]], ...)
  9: .x(x)
  10: eval_tidy(call, mask)
  11: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 31. Error: Summary creates the correct summary object (@test-summary.R#5)  --
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(iris) at testthat/test-summary.R:5
  2: skim.data.frame(iris)
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 32. Error: The summary print method prints the correct object (@test-summary.
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(iris) at testthat/test-summary.R:13
  2: skim.data.frame(iris)
  3: purrr::map(.data[selected], skim_v)
  4: .f(.x[[i]], ...)
  5: purrr::map(funs, ~.x(x))
  6: .f(.x[[i]], ...)
  7: .x(x)
  8: eval_tidy(call, mask)
  9: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 33. Error: The summary print method prints the correct object when piped (@te
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(iris) %>% summary() at testthat/test-summary.R:29
  2: eval(lhs, parent, parent)
  3: eval(lhs, parent, parent)
  4: skim(iris)
  5: skim.data.frame(iris)
  6: purrr::map(.data[selected], skim_v)
  7: .f(.x[[i]], ...)
  8: purrr::map(funs, ~.x(x))
  9: .f(.x[[i]], ...)
  10: .x(x)
  11: eval_tidy(call, mask)
  12: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 34. Error: The summary pander method returns the correct object (@test-summar
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(iris) %>% summary() at testthat/test-summary.R:42
  2: eval(lhs, parent, parent)
  3: eval(lhs, parent, parent)
  4: skim(iris)
  5: skim.data.frame(iris)
  6: purrr::map(.data[selected], skim_v)
  7: .f(.x[[i]], ...)
  8: purrr::map(funs, ~.x(x))
  9: .f(.x[[i]], ...)
  10: .x(x)
  11: eval_tidy(call, mask)
  12: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  -- 35. Error: The summary kable method returns the correct object (@test-summary
  no applicable method for 'mean' applied to an object of class "c('double', 'numeric')"
  1: skim(iris) %>% summary() at testthat/test-summary.R:60
  2: eval(lhs, parent, parent)
  3: eval(lhs, parent, parent)
  4: skim(iris)
  5: skim.data.frame(iris)
  6: purrr::map(.data[selected], skim_v)
  7: .f(.x[[i]], ...)
  8: purrr::map(funs, ~.x(x))
  9: .f(.x[[i]], ...)
  10: .x(x)
  11: eval_tidy(call, mask)
  12: (function (x, ...) 
     UseMethod("mean"))(na.rm = TRUE, ...)
  
  == testthat results  ===========================================================
  OK: 142 SKIPPED: 2 FAILED: 35
  1. Error: (unknown) (@test-dplyr.R#3) 
  2. Error: Formatting options change printed output (@test-formats.R#53) 
  3. Error: A class with an empty function list returns nothing (@test-functions.R#142) 
  4. Error: Skimming a data frame works as expected (@test-skim.R#4) 
  5. Error: Using skim_tee returns the object (@test-skim.R#36) 
  6. Error: Using skim_tee prints out the object (@test-skim.R#41) 
  7. Error: Skimming a grouped data frame works as expected (@test-skim.R#50) 
  8. Error: skim_to_wide works as expected. (@test-skim.R#80) 
  9. Error: skim_to_list works as expected (@test-skim.R#92) 
  1. ...
  
  Error: testthat unit tests failed
  Execution halted