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

> ### Name: summarize_model
> ### Title: Summarize model output
> ### Aliases: summarize_model
> 
> ### ** Examples
> 
> 
> set.seed(1234567)
> 
> simulated_data <- simulate_data(nsubjects = 20)
Joining, by = "id"
> 
> model_output <- ushr(data = simulated_data)
Warning in sqrt(diag(fisher_info)) : NaNs produced
Warning in sqrt(diag(fisher_info)) : NaNs produced
Warning in sqrt(diag(fisher_info)) : NaNs produced
Warning in bind_rows_(x, .id) :
  Unequal factor levels: coercing to character
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  Unequal factor levels: coercing to character
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  Unequal factor levels: coercing to character
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  Unequal factor levels: coercing to character
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  Unequal factor levels: coercing to character
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
Warning in bind_rows_(x, .id) :
  binding character and factor vector, coercing into character vector
> 
> summarize_model(model_output, data = simulated_data)
Joining, by = c("id", "Model")
Joining, by = "id"
Error: Assigned data `values` must be compatible with existing data.
i Error occurred for column `ShortLifespan`.
x No common type for `value` <character> and `x` <double>.
Backtrace:
     x
  1. \-ushr::summarize_model(model_output, data = simulated_data)
  2.   \-`%>%`(...)
  3.     +-base::withVisible(eval(quote(`_fseq`(`_lhs`)), env, env))
  4.     \-base::eval(quote(`_fseq`(`_lhs`)), env, env)
  5.       \-base::eval(quote(`_fseq`(`_lhs`)), env, env)
  6.         \-ushr:::`_fseq`(`_lhs`)
  7.           \-magrittr::freduce(value, `_function_list`)
  8.             +-base::withVisible(function_list[[k]](value))
  9.             \-function_list[[k]](value)
 10.               \-base::replace(., is.na(.), "")
 11.                 +-base::`[<-`(`*tmp*`, list, value = "")
 12.                 \-tibble:::`[<-.tbl_df`(`*tmp*`, list, value = "")
 13.                   \-tibble:::tbl_subassign_matrix(x, j, value, j_arg, substitute(value))
 14.                     \-base::tryCatch(...)
 15. 
Execution halted