Running ‘testthat.R’ [13s/19s]
Running the tests in ‘tests/testthat.R’ failed.
Complete output:
  > library(testthat)
  > library(noah)
  > 
  > test_check("noah")
  [ FAIL 17 | WARN 0 | SKIP 2 | PASS 31 ]
  
  ══ Skipped tests ═══════════════════════════════════════════════════════════════
  • Long-running test skipped. Using shorter version. (2)
  
  ══ Failed tests ════════════════════════════════════════════════════════════════
  ── Error (test-ark.R:31:3): A single value can be pseudonymized ────────────────
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─noah::pseudonymize("Mata Hari") at test-ark.R:31:2
    2. │ └─.ark$pseudonymize(..., .alliterate = .alliterate)
    3. │   ├─base::suppressMessages(dplyr::bind_cols(...))
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─dplyr::bind_cols(...)
    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("", "...1")
   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-2553110-18", 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)
  ── Error (test-ark.R:41:3): Ark length method works ────────────────────────────
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─ark$pseudonymize("Mata Hari") at test-ark.R:41:2
    2. │ ├─base::suppressMessages(dplyr::bind_cols(...))
    3. │ │ └─base::withCallingHandlers(...)
    4. │ └─dplyr::bind_cols(...)
    5. │   ├─dplyr:::fix_call(vec_cbind(!!!dots, .name_repair = .name_repair))
    6. │   │ └─base::withCallingHandlers(...)
    7. │   └─vctrs::vec_cbind(!!!dots, .name_repair = .name_repair)
    8. ├─vctrs:::describe_repair("", "...1")
    9. │ └─rlang::names_inform_repair(orig_names, names)
   10. │   └─rlang::inform(message = message, class = "rlib_message_name_repair")
   11. │     ├─base::withRestarts(...)
   12. │     │ └─base (local) withOneRestart(expr, restarts[[1L]])
   13. │     │   └─base (local) doWithOneRestart(return(expr), restart)
   14. │     └─base::signalCondition(cnd)
   15. │       ├─base::conditionMessage(cond)
   16. │       └─rlang:::conditionMessage.rlang_message(cond)
   17. │         └─rlang::cnd_message(c)
   18. │           └─rlang:::cnd_message_format(cnd, ...)
   19. │             └─rlang (local) cli_format(glue_escape(lines))
   20. │               └─rlang:::.rlang_cli_format(x, cli::format_message)
   21. │                 └─cli::cli_format(x, .envir = emptyenv())
   22. │                   └─cli:::fmt(...)
   23. │                     └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   24. │                       ├─base::do.call(app[[msg$type]], msg$args)
   25. │                       └─cli (local) `<fn>`(text = `<named list>`, id = "cli-2553110-36", class = NULL)
   26. │                         └─cli:::clii_bullets(app, text, id, class)
   27. │                           └─base::lapply(...)
   28. │                             └─cli (local) FUN(X[[i]], ...)
   29. │                               └─app$text(text[[i]])
   30. │                                 └─cli:::clii_text(app, text)
   31. │                                   └─app$xtext(text)
   32. │                                     └─cli:::clii__xtext(...)
   33. │                                       └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   34. │                                         └─base::lapply(pars, ansi_trimws)
   35. │                                           └─cli (local) FUN(X[[i]], ...)
   36. └─base::.handleSimpleError(...)
   37.   └─dplyr (local) h(simpleError(msg, call))
   38.     └─rlang::cnd_signal(cnd)
  ── Error (test-ark.R:63:3): Fail when requesting more pseudonyms than available ──
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─testthat::expect_vector(ark$pseudonymize(1:max_total)) at test-ark.R:63:2
    2. │ └─testthat::quasi_label(enquo(object), arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─ark$pseudonymize(1:max_total)
    5. │ ├─base::suppressMessages(dplyr::bind_cols(...))
    6. │ │ └─base::withCallingHandlers(...)
    7. │ └─dplyr::bind_cols(...)
    8. │   ├─dplyr:::fix_call(vec_cbind(!!!dots, .name_repair = .name_repair))
    9. │   │ └─base::withCallingHandlers(...)
   10. │   └─vctrs::vec_cbind(!!!dots, .name_repair = .name_repair)
   11. ├─vctrs:::describe_repair("", "...1")
   12. │ └─rlang::names_inform_repair(orig_names, names)
   13. │   └─rlang::inform(message = message, class = "rlib_message_name_repair")
   14. │     ├─base::withRestarts(...)
   15. │     │ └─base (local) withOneRestart(expr, restarts[[1L]])
   16. │     │   └─base (local) doWithOneRestart(return(expr), restart)
   17. │     └─base::signalCondition(cnd)
   18. │       ├─base::conditionMessage(cond)
   19. │       └─rlang:::conditionMessage.rlang_message(cond)
   20. │         └─rlang::cnd_message(c)
   21. │           └─rlang:::cnd_message_format(cnd, ...)
   22. │             └─rlang (local) cli_format(glue_escape(lines))
   23. │               └─rlang:::.rlang_cli_format(x, cli::format_message)
   24. │                 └─cli::cli_format(x, .envir = emptyenv())
   25. │                   └─cli:::fmt(...)
   26. │                     └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   27. │                       ├─base::do.call(app[[msg$type]], msg$args)
   28. │                       └─cli (local) `<fn>`(text = `<named list>`, id = "cli-2553110-54", class = NULL)
   29. │                         └─cli:::clii_bullets(app, text, id, class)
   30. │                           └─base::lapply(...)
   31. │                             └─cli (local) FUN(X[[i]], ...)
   32. │                               └─app$text(text[[i]])
   33. │                                 └─cli:::clii_text(app, text)
   34. │                                   └─app$xtext(text)
   35. │                                     └─cli:::clii__xtext(...)
   36. │                                       └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   37. │                                         └─base::lapply(pars, ansi_trimws)
   38. │                                           └─cli (local) FUN(X[[i]], ...)
   39. └─base::.handleSimpleError(...)
   40.   └─dplyr (local) h(simpleError(msg, call))
   41.     └─rlang::cnd_signal(cnd)
  ── Error (test-ark.R:69:3): Multiple values can be pseudonymized ───────────────
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─noah::pseudonymize(c("Mata Hari", "James Bond", "Lewis Carroll")) at test-ark.R:69:2
    2. │ └─.ark$pseudonymize(..., .alliterate = .alliterate)
    3. │   ├─base::suppressMessages(dplyr::bind_cols(...))
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─dplyr::bind_cols(...)
    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("", "...1")
   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-2553110-72", 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)
  ── Error (test-ark.R:76:3): same pseudonym for same input ──────────────────────
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─testthat::expect_equal(...) at test-ark.R:76:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─noah::pseudonymize(a, .ark = ark)
    5. │ └─.ark$pseudonymize(..., .alliterate = .alliterate)
    6. │   ├─base::suppressMessages(dplyr::bind_cols(...))
    7. │   │ └─base::withCallingHandlers(...)
    8. │   └─dplyr::bind_cols(...)
    9. │     ├─dplyr:::fix_call(vec_cbind(!!!dots, .name_repair = .name_repair))
   10. │     │ └─base::withCallingHandlers(...)
   11. │     └─vctrs::vec_cbind(!!!dots, .name_repair = .name_repair)
   12. ├─vctrs:::describe_repair("", "...1")
   13. │ └─rlang::names_inform_repair(orig_names, names)
   14. │   └─rlang::inform(message = message, class = "rlib_message_name_repair")
   15. │     ├─base::withRestarts(...)
   16. │     │ └─base (local) withOneRestart(expr, restarts[[1L]])
   17. │     │   └─base (local) doWithOneRestart(return(expr), restart)
   18. │     └─base::signalCondition(cnd)
   19. │       ├─base::conditionMessage(cond)
   20. │       └─rlang:::conditionMessage.rlang_message(cond)
   21. │         └─rlang::cnd_message(c)
   22. │           └─rlang:::cnd_message_format(cnd, ...)
   23. │             └─rlang (local) cli_format(glue_escape(lines))
   24. │               └─rlang:::.rlang_cli_format(x, cli::format_message)
   25. │                 └─cli::cli_format(x, .envir = emptyenv())
   26. │                   └─cli:::fmt(...)
   27. │                     └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   28. │                       ├─base::do.call(app[[msg$type]], msg$args)
   29. │                       └─cli (local) `<fn>`(text = `<named list>`, id = "cli-2553110-90", class = NULL)
   30. │                         └─cli:::clii_bullets(app, text, id, class)
   31. │                           └─base::lapply(...)
   32. │                             └─cli (local) FUN(X[[i]], ...)
   33. │                               └─app$text(text[[i]])
   34. │                                 └─cli:::clii_text(app, text)
   35. │                                   └─app$xtext(text)
   36. │                                     └─cli:::clii__xtext(...)
   37. │                                       └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   38. │                                         └─base::lapply(pars, ansi_trimws)
   39. │                                           └─cli (local) FUN(X[[i]], ...)
   40. └─base::.handleSimpleError(...)
   41.   └─dplyr (local) h(simpleError(msg, call))
   42.     └─rlang::cnd_signal(cnd)
  ── Error (test-ark.R:85:3): Different pseudonym for different input ────────────
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─testthat::expect_true(...) at test-ark.R:85:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─noah::pseudonymize(a, .ark = ark)
    5. │ └─.ark$pseudonymize(..., .alliterate = .alliterate)
    6. │   ├─base::suppressMessages(dplyr::bind_cols(...))
    7. │   │ └─base::withCallingHandlers(...)
    8. │   └─dplyr::bind_cols(...)
    9. │     ├─dplyr:::fix_call(vec_cbind(!!!dots, .name_repair = .name_repair))
   10. │     │ └─base::withCallingHandlers(...)
   11. │     └─vctrs::vec_cbind(!!!dots, .name_repair = .name_repair)
   12. ├─vctrs:::describe_repair("", "...1")
   13. │ └─rlang::names_inform_repair(orig_names, names)
   14. │   └─rlang::inform(message = message, class = "rlib_message_name_repair")
   15. │     ├─base::withRestarts(...)
   16. │     │ └─base (local) withOneRestart(expr, restarts[[1L]])
   17. │     │   └─base (local) doWithOneRestart(return(expr), restart)
   18. │     └─base::signalCondition(cnd)
   19. │       ├─base::conditionMessage(cond)
   20. │       └─rlang:::conditionMessage.rlang_message(cond)
   21. │         └─rlang::cnd_message(c)
   22. │           └─rlang:::cnd_message_format(cnd, ...)
   23. │             └─rlang (local) cli_format(glue_escape(lines))
   24. │               └─rlang:::.rlang_cli_format(x, cli::format_message)
   25. │                 └─cli::cli_format(x, .envir = emptyenv())
   26. │                   └─cli:::fmt(...)
   27. │                     └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   28. │                       ├─base::do.call(app[[msg$type]], msg$args)
   29. │                       └─cli (local) `<fn>`(text = `<named list>`, id = "cli-2553110-108", class = NULL)
   30. │                         └─cli:::clii_bullets(app, text, id, class)
   31. │                           └─base::lapply(...)
   32. │                             └─cli (local) FUN(X[[i]], ...)
   33. │                               └─app$text(text[[i]])
   34. │                                 └─cli:::clii_text(app, text)
   35. │                                   └─app$xtext(text)
   36. │                                     └─cli:::clii__xtext(...)
   37. │                                       └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   38. │                                         └─base::lapply(pars, ansi_trimws)
   39. │                                           └─cli (local) FUN(X[[i]], ...)
   40. └─base::.handleSimpleError(...)
   41.   └─dplyr (local) h(simpleError(msg, call))
   42.     └─rlang::cnd_signal(cnd)
  ── Error (test-ark.R:92:3): same pseudonym for same input when using integers ──
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─ark$pseudonymize(1:5) at test-ark.R:92:2
    2. │ ├─base::suppressMessages(dplyr::bind_cols(...))
    3. │ │ └─base::withCallingHandlers(...)
    4. │ └─dplyr::bind_cols(...)
    5. │   ├─dplyr:::fix_call(vec_cbind(!!!dots, .name_repair = .name_repair))
    6. │   │ └─base::withCallingHandlers(...)
    7. │   └─vctrs::vec_cbind(!!!dots, .name_repair = .name_repair)
    8. ├─vctrs:::describe_repair("", "...1")
    9. │ └─rlang::names_inform_repair(orig_names, names)
   10. │   └─rlang::inform(message = message, class = "rlib_message_name_repair")
   11. │     ├─base::withRestarts(...)
   12. │     │ └─base (local) withOneRestart(expr, restarts[[1L]])
   13. │     │   └─base (local) doWithOneRestart(return(expr), restart)
   14. │     └─base::signalCondition(cnd)
   15. │       ├─base::conditionMessage(cond)
   16. │       └─rlang:::conditionMessage.rlang_message(cond)
   17. │         └─rlang::cnd_message(c)
   18. │           └─rlang:::cnd_message_format(cnd, ...)
   19. │             └─rlang (local) cli_format(glue_escape(lines))
   20. │               └─rlang:::.rlang_cli_format(x, cli::format_message)
   21. │                 └─cli::cli_format(x, .envir = emptyenv())
   22. │                   └─cli:::fmt(...)
   23. │                     └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   24. │                       ├─base::do.call(app[[msg$type]], msg$args)
   25. │                       └─cli (local) `<fn>`(text = `<named list>`, id = "cli-2553110-126", class = NULL)
   26. │                         └─cli:::clii_bullets(app, text, id, class)
   27. │                           └─base::lapply(...)
   28. │                             └─cli (local) FUN(X[[i]], ...)
   29. │                               └─app$text(text[[i]])
   30. │                                 └─cli:::clii_text(app, text)
   31. │                                   └─app$xtext(text)
   32. │                                     └─cli:::clii__xtext(...)
   33. │                                       └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   34. │                                         └─base::lapply(pars, ansi_trimws)
   35. │                                           └─cli (local) FUN(X[[i]], ...)
   36. └─base::.handleSimpleError(...)
   37.   └─dplyr (local) h(simpleError(msg, call))
   38.     └─rlang::cnd_signal(cnd)
  ── Error (test-ark.R:104:3): Multiple vectors can be pseudonymized ─────────────
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─testthat::expect_true(...) at test-ark.R:104:2
    2. │ └─testthat::quasi_label(enquo(object), label, arg = "object")
    3. │   └─rlang::eval_bare(expr, quo_get_env(quo))
    4. ├─noah::pseudonymize(a, b, .ark = ark)
    5. │ └─.ark$pseudonymize(..., .alliterate = .alliterate)
    6. │   ├─base::suppressMessages(dplyr::bind_cols(...))
    7. │   │ └─base::withCallingHandlers(...)
    8. │   └─dplyr::bind_cols(...)
    9. │     ├─dplyr:::fix_call(vec_cbind(!!!dots, .name_repair = .name_repair))
   10. │     │ └─base::withCallingHandlers(...)
   11. │     └─vctrs::vec_cbind(!!!dots, .name_repair = .name_repair)
   12. ├─vctrs:::describe_repair(`<chr>`, `<chr>`)
   13. │ └─rlang::names_inform_repair(orig_names, names)
   14. │   └─rlang::inform(message = message, class = "rlib_message_name_repair")
   15. │     ├─base::withRestarts(...)
   16. │     │ └─base (local) withOneRestart(expr, restarts[[1L]])
   17. │     │   └─base (local) doWithOneRestart(return(expr), restart)
   18. │     └─base::signalCondition(cnd)
   19. │       ├─base::conditionMessage(cond)
   20. │       └─rlang:::conditionMessage.rlang_message(cond)
   21. │         └─rlang::cnd_message(c)
   22. │           └─rlang:::cnd_message_format(cnd, ...)
   23. │             └─rlang (local) cli_format(glue_escape(lines))
   24. │               └─rlang:::.rlang_cli_format(x, cli::format_message)
   25. │                 └─cli::cli_format(x, .envir = emptyenv())
   26. │                   └─cli:::fmt(...)
   27. │                     └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   28. │                       ├─base::do.call(app[[msg$type]], msg$args)
   29. │                       └─cli (local) `<fn>`(text = `<named list>`, id = "cli-2553110-156", class = NULL)
   30. │                         └─cli:::clii_bullets(app, text, id, class)
   31. │                           └─base::lapply(...)
   32. │                             └─cli (local) FUN(X[[i]], ...)
   33. │                               └─app$text(text[[i]])
   34. │                                 └─cli:::clii_text(app, text)
   35. │                                   └─app$xtext(text)
   36. │                                     └─cli:::clii__xtext(...)
   37. │                                       └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   38. │                                         └─base::lapply(pars, ansi_trimws)
   39. │                                           └─cli (local) FUN(X[[i]], ...)
   40. └─base::.handleSimpleError(...)
   41.   └─dplyr (local) h(simpleError(msg, call))
   42.     └─rlang::cnd_signal(cnd)
  ── Error (test-ark.R:121:3): Data frame columns can be pseudonymized ───────────
  <dplyr:::mutate_error/rlang_error/error/condition>
  Error in `dplyr::mutate(df, ab = pseudonymize(a, b, .ark = ark), bc = pseudonymize(b, 
      c, .ark = ark), ca = pseudonymize(c, a, .ark = ark))`: Problem while computing `ab = pseudonymize(a, b, .ark = ark)`.
  Caused by error in `dplyr::bind_cols()`:
  ! number of characters is not computable in "bytes" encoding, element 1
  ── Error (test-ark.R:202:3): Ark print function prints something ───────────────
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─noah::pseudonymize(1:20, .ark = ark) at test-ark.R:202:2
    2. │ └─.ark$pseudonymize(..., .alliterate = .alliterate)
    3. │   ├─base::suppressMessages(dplyr::bind_cols(...))
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─dplyr::bind_cols(...)
    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("", "...1")
   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-2553110-226", 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)
  ── Error (test-ark.R:211:3): Ark print n argument works ────────────────────────
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─noah::pseudonymize(1:20, .ark = ark) at test-ark.R:211:2
    2. │ └─.ark$pseudonymize(..., .alliterate = .alliterate)
    3. │   ├─base::suppressMessages(dplyr::bind_cols(...))
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─dplyr::bind_cols(...)
    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("", "...1")
   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-2553110-244", 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)
  ── Error (test-ark.R:224:3): Alliterations work with alliterating Ark ──────────
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─noah::pseudonymize(1:10, .ark = ark) at test-ark.R:224:2
    2. │ └─.ark$pseudonymize(..., .alliterate = .alliterate)
    3. │   ├─base::suppressMessages(dplyr::bind_cols(...))
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─dplyr::bind_cols(...)
    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("", "...1")
   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-2553110-262", 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)
  ── Error (test-ark.R:233:3): Alliterations work with `pseudonymize()` ──────────
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─ark$pseudonymize(1:10, .alliterate = TRUE) at test-ark.R:233:2
    2. │ ├─base::suppressMessages(dplyr::bind_cols(...))
    3. │ │ └─base::withCallingHandlers(...)
    4. │ └─dplyr::bind_cols(...)
    5. │   ├─dplyr:::fix_call(vec_cbind(!!!dots, .name_repair = .name_repair))
    6. │   │ └─base::withCallingHandlers(...)
    7. │   └─vctrs::vec_cbind(!!!dots, .name_repair = .name_repair)
    8. ├─vctrs:::describe_repair("", "...1")
    9. │ └─rlang::names_inform_repair(orig_names, names)
   10. │   └─rlang::inform(message = message, class = "rlib_message_name_repair")
   11. │     ├─base::withRestarts(...)
   12. │     │ └─base (local) withOneRestart(expr, restarts[[1L]])
   13. │     │   └─base (local) doWithOneRestart(return(expr), restart)
   14. │     └─base::signalCondition(cnd)
   15. │       ├─base::conditionMessage(cond)
   16. │       └─rlang:::conditionMessage.rlang_message(cond)
   17. │         └─rlang::cnd_message(c)
   18. │           └─rlang:::cnd_message_format(cnd, ...)
   19. │             └─rlang (local) cli_format(glue_escape(lines))
   20. │               └─rlang:::.rlang_cli_format(x, cli::format_message)
   21. │                 └─cli::cli_format(x, .envir = emptyenv())
   22. │                   └─cli:::fmt(...)
   23. │                     └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   24. │                       ├─base::do.call(app[[msg$type]], msg$args)
   25. │                       └─cli (local) `<fn>`(text = `<named list>`, id = "cli-2553110-280", class = NULL)
   26. │                         └─cli:::clii_bullets(app, text, id, class)
   27. │                           └─base::lapply(...)
   28. │                             └─cli (local) FUN(X[[i]], ...)
   29. │                               └─app$text(text[[i]])
   30. │                                 └─cli:::clii_text(app, text)
   31. │                                   └─app$xtext(text)
   32. │                                     └─cli:::clii__xtext(...)
   33. │                                       └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   34. │                                         └─base::lapply(pars, ansi_trimws)
   35. │                                           └─cli (local) FUN(X[[i]], ...)
   36. └─base::.handleSimpleError(...)
   37.   └─dplyr (local) h(simpleError(msg, call))
   38.     └─rlang::cnd_signal(cnd)
  ── Error (test-ark.R:248:3): Alliterations work with custom name parts and more than two
            dimensions ──
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─noah::pseudonymize(1:10, .ark = ark, .alliterate = TRUE) at test-ark.R:248:2
    2. │ └─.ark$pseudonymize(..., .alliterate = .alliterate)
    3. │   ├─base::suppressMessages(dplyr::bind_cols(...))
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─dplyr::bind_cols(...)
    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("", "...1")
   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-2553110-298", 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)
  ── Error (test-ark.R:262:3): ark can produce max_total unique pseudonyms using custom name
            parts ──
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─ark$pseudonymize(1:max_total) at test-ark.R:262:2
    2. │ ├─base::suppressMessages(dplyr::bind_cols(...))
    3. │ │ └─base::withCallingHandlers(...)
    4. │ └─dplyr::bind_cols(...)
    5. │   ├─dplyr:::fix_call(vec_cbind(!!!dots, .name_repair = .name_repair))
    6. │   │ └─base::withCallingHandlers(...)
    7. │   └─vctrs::vec_cbind(!!!dots, .name_repair = .name_repair)
    8. ├─vctrs:::describe_repair("", "...1")
    9. │ └─rlang::names_inform_repair(orig_names, names)
   10. │   └─rlang::inform(message = message, class = "rlib_message_name_repair")
   11. │     ├─base::withRestarts(...)
   12. │     │ └─base (local) withOneRestart(expr, restarts[[1L]])
   13. │     │   └─base (local) doWithOneRestart(return(expr), restart)
   14. │     └─base::signalCondition(cnd)
   15. │       ├─base::conditionMessage(cond)
   16. │       └─rlang:::conditionMessage.rlang_message(cond)
   17. │         └─rlang::cnd_message(c)
   18. │           └─rlang:::cnd_message_format(cnd, ...)
   19. │             └─rlang (local) cli_format(glue_escape(lines))
   20. │               └─rlang:::.rlang_cli_format(x, cli::format_message)
   21. │                 └─cli::cli_format(x, .envir = emptyenv())
   22. │                   └─cli:::fmt(...)
   23. │                     └─cli:::cli__fmt(rec, collapse, strip_newline, app)
   24. │                       ├─base::do.call(app[[msg$type]], msg$args)
   25. │                       └─cli (local) `<fn>`(text = `<named list>`, id = "cli-2553110-316", class = NULL)
   26. │                         └─cli:::clii_bullets(app, text, id, class)
   27. │                           └─base::lapply(...)
   28. │                             └─cli (local) FUN(X[[i]], ...)
   29. │                               └─app$text(text[[i]])
   30. │                                 └─cli:::clii_text(app, text)
   31. │                                   └─app$xtext(text)
   32. │                                     └─cli:::clii__xtext(...)
   33. │                                       └─cli::ansi_strwrap(text, exdent = exdent, width = app$get_width(extra = padding))
   34. │                                         └─base::lapply(pars, ansi_trimws)
   35. │                                           └─cli (local) FUN(X[[i]], ...)
   36. └─base::.handleSimpleError(...)
   37.   └─dplyr (local) h(simpleError(msg, call))
   38.     └─rlang::cnd_signal(cnd)
  ── Error (test-ark.R:278:3): seed argument makes Ark reproducible ──────────────
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─noah::pseudonymize(1:10, .ark = Ark$new(seed = 1)) at test-ark.R:278:2
    2. │ └─.ark$pseudonymize(..., .alliterate = .alliterate)
    3. │   ├─base::suppressMessages(dplyr::bind_cols(...))
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─dplyr::bind_cols(...)
    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("", "...1")
   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-2553110-334", 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)
  ── Error (test-ark.R:298:3): alliterate TRUE/FALSE can be mixed without pseudonyms repeating when
            using custom name parts ──
  Error in `dplyr::bind_cols(...)`: number of characters is not computable in "bytes" encoding, element 1
  Backtrace:
       ▆
    1. ├─noah::pseudonymize(1:k, .alliterate = TRUE, .ark = ark) at test-ark.R:298:2
    2. │ └─.ark$pseudonymize(..., .alliterate = .alliterate)
    3. │   ├─base::suppressMessages(dplyr::bind_cols(...))
    4. │   │ └─base::withCallingHandlers(...)
    5. │   └─dplyr::bind_cols(...)
    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("", "...1")
   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-2553110-352", 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 17 | WARN 0 | SKIP 2 | PASS 31 ]
  Error: Test failures
  Execution halted