Running examples in 'vpc-Ex.R' failed
The error most likely occurred in:

> ### Name: vpc_cat
> ### Title: VPC function for categorical
> ### Aliases: vpc_cat
> 
> ### ** Examples
> 
> 
> ## See vpc.ronkeizer.com for more documentation and examples
> library(vpc)
> 
> # simple function to simulate categorical data for single individual
> sim_id <- function(id = 1) {
+   n <- 10
+   logit <- function(x) exp(x) / (1+exp(x))
+   data.frame(id = id, time = seq(1, n, length.out = n),
+              dv = round(logit((1:n) - n/2 + rnorm(n, 0, 1.5))) )
+ }
> ## simple function to simulate categorical data for a trial
> sim_trial <- function(i = 1, n = 20) { # function to simulate categorical data for a trial
+   data.frame(sim = i, do.call("rbind", lapply(1:n, sim_id)))
+ }
> 
> ## simulate single trial for 20 individuals
> obs <- sim_trial(n = 20)
> 
> ## simulate 200 trials of 20 individuals
> sim <- do.call("rbind", lapply(1:200, sim_trial, n = 20))
> 
> ## Plot categorical VPC
> vpc_cat(sim = sim, obs = obs)
Error in `dplyr::bind_cols()`:
! number of characters is not computable in "bytes" encoding, element 1
Backtrace:
     ▆
  1. ├─vpc::vpc_cat(sim = sim, obs = obs)
  2. │ ├─base::suppressMessages(...)
  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(`<chr>`, `<chr>`)
  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-24140-30", 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)
Execution halted