Running examples in ‘EpiNow2-Ex.R’ failed
The error most likely occurred in:

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: adjust_infection_to_report
> ### Title: Adjust from Case Counts by Infection Date to Date of Report
> ### Aliases: adjust_infection_to_report
> 
> ### ** Examples
> 
> # define example cases
> cases <- data.table::copy(example_confirmed)[, cases := as.integer(confirm)]
> 
> # define a single report delay distribution
> delay_def <- lognorm_dist_def(mean = 5, mean_sd = 1, sd = 3, sd_sd = 1,
+                              max_value = 30, samples = 1, to_log = TRUE)
>                                        
> # define a single incubation period
> incubation_def <- lognorm_dist_def(mean = incubation_periods[1, ]$mean,
+                                    mean_sd = incubation_periods[1, ]$mean_sd,
+                                    sd = incubation_periods[1, ]$sd,
+                                    sd_sd = incubation_periods[1, ]$sd_sd,
+                                    max_value = 30, samples = 1)
>                                            
> # simple mapping
> report <- adjust_infection_to_report(cases, delay_defs = list(incubation_def, delay_def))   
Error in `dplyr::bind_cols()`:
! number of characters is not computable in "bytes" encoding, element 1
Backtrace:
     ▆
  1. ├─EpiNow2::adjust_infection_to_report(...)
  2. │ └─EpiNow2 (local) sample_single_dist(infections, delay_defs[[1]])
  3. │   └─EpiNow2::sample_approx_dist(...)
  4. │     ├─base::suppressMessages(...)
  5. │     │ └─base::withCallingHandlers(...)
  6. │     └─purrr::map_dfc(...)
  7. │       └─dplyr::bind_cols(res)
  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(`<chr>`, `<chr>`)
 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-1566", 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)
Execution halted