Running 'testthat.R' [12s]
Running the tests in 'tests/testthat.R' failed.
Complete output:
  > library(testthat)
  > library(sjmisc)
  > 
  > test_check("sjmisc")
  # x
  
       label frq raw.prc valid.prc cum.prc
  1    First   5   41.67     41.67   41.67
  2 Not home   3   25.00     25.00   66.67
  3  Refused   4   33.33     33.33  100.00
  
  
  # y
  
      label frq raw.prc valid.prc cum.prc
  1     A D   5   41.67     41.67   41.67
  2    An E   1    8.33      8.33   50.00
  3 The eff   6   50.00     50.00  100.00
  
  
       label frq raw.prc valid.prc cum.prc
  1    First   5   41.67     41.67   41.67
  2 Not home   3   25.00     25.00   66.67
  3  Refused   4   33.33     33.33  100.00
  
  # x
  
       label frq raw.prc valid.prc cum.prc
  1    First   5   41.67     41.67   41.67
  2 Not home   3   25.00     25.00   66.67
  3  Refused   4   33.33     33.33  100.00
  
  
  # x
  
       label frq raw.prc valid.prc cum.prc
  1    First   5   41.67     41.67   41.67
  2 Not home   3   25.00     25.00   66.67
  3  Refused   4   33.33     33.33  100.00
  
  
  # y
  
      label frq raw.prc valid.prc cum.prc
  1     A D   5   41.67     41.67   41.67
  2    An E   1    8.33      8.33   50.00
  3 The eff   6   50.00     50.00  100.00
  
  
       label frq raw.prc valid.prc cum.prc
  1    First   5   41.67     41.67   41.67
  2 Not home   3   25.00     25.00   66.67
  3  Refused   4   33.33     33.33  100.00
  
  
   iter imp variable
    1   1  Species
    1   2  Species
    1   3  Species
    1   4  Species
    1   5  Species
    2   1  Species
    2   2  Species
    2   3  Species
    2   4  Species
    2   5  Species
    3   1  Species
    3   2  Species
    3   3  Species
    3   4  Species
    3   5  Species
    4   1  Species
    4   2  Species
    4   3  Species
    4   4  Species
    4   5  Species
    5   1  Species
    5   2  Species
    5   3  Species
    5   4  Species
    5   5  Species
  One or more of the old values are recoded into identical new values.
  Please check if you correctly specified the recode-pattern,
  else separate multiple values with comma, e.g. rec="a,b,c=1; d,e,f=2".
  [ FAIL 1 | WARN 0 | SKIP 11 | PASS 155 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • On CRAN (3)
  • empty test (8)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-frq.R:86:3): frq ────────────────────────────────────────────────
  Error in `dplyr::bind_cols(out)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─efc %>% dplyr::group_by(c172code) %>% ... at test-frq.R:86:2
    2. ├─sjmisc::frq(., c161sex, e15relat, grp.strings = 2)
    3. │ └─sjmisc:::get_dot_data(x, dplyr::enquos(...))
    4. │   └─sjmisc:::build_dot_data(x, qs)
    5. │     └─dplyr::bind_cols(out)
    6. │       ├─dplyr:::fix_call(vec_cbind(!!!dots, .name_repair = .name_repair))
    7. │       │ └─base::withCallingHandlers(...)
    8. │       └─vctrs::vec_cbind(!!!dots, .name_repair = .name_repair)
    9. ├─vctrs:::describe_repair(`<chr>`, `<chr>`)
   10. │ └─rlang::names_inform_repair(orig_names, names)
   11. │   └─rlang::inform(message = message, class = "rlib_message_name_repair")
   12. │     ├─base::withRestarts(...)
   13. │     │ └─base (local) withOneRestart(expr, restarts[[1L]])
   14. │     │   └─base (local) doWithOneRestart(return(expr), restart)
   15. │     └─base::signalCondition(cnd)
   16. │       ├─base::conditionMessage(cond)
   17. │       └─rlang:::conditionMessage.rlang_message(cond)
   18. │         └─rlang::cnd_message(c)
   19. │           └─rlang:::cnd_message_format(cnd, ...)
   20. │             └─rlang (local) cli_format(glue_escape(lines))
   21. │               └─rlang:::.rlang_cli_format(x, cli::format_message)
   22. │                 └─cli::cli_format(x, .envir = emptyenv())
   23. │                   └─cli:::fmt(...)
   24. │                     └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   25. │                       ├─base::do.call(app[[msg$type]], msg$args)
   26. │                       └─cli (local) `<fn>`(text = `<named list>`, id = "cli-24140-190", class = NULL)
   27. │                         └─cli:::clii_bullets(app, text, id, class)
   28. │                           └─base::lapply(...)
   29. │                             └─cli (local) FUN(X[[i]], ...)
   30. │                               └─app$text(text[[i]])
   31. │                                 └─cli:::clii_text(app, text)
   32. │                                   └─app$xtext(text)
   33. │                                     └─cli:::clii__xtext(...)
   34. │                                       └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   35. │                                         └─base::lapply(pars, ansi_trimws)
   36. │                                           └─cli (local) FUN(X[[i]], ...)
   37. └─base::.handleSimpleError(...)
   38.   └─dplyr (local) h(simpleError(msg, call))
   39.     └─rlang::cnd_signal(cnd)
  
  [ FAIL 1 | WARN 0 | SKIP 11 | PASS 155 ]
  Error: Test failures
  Execution halted