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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: tbl_reg_summary
> ### Title: Data Summary Table
> ### Aliases: tbl_reg_summary
> 
> ### ** Examples
> 
> tbl_reg_summary_ex1 <-
+   df_patient_characteristics %>%
+   tbl_reg_summary(by = trt, include = c(marker, status))
Error in `dplyr::mutate()`:
ℹ In argument: `stat = list(...)`.
Caused by error in `glue_data()`:
! is.environment(.envir) is not TRUE
Backtrace:
     ▆
  1. ├─df_patient_characteristics %>% ...
  2. ├─gtreg::tbl_reg_summary(., by = trt, include = c(marker, status))
  3. │ ├─... %>% ...
  4. │ ├─gtsummary::with_gtsummary_theme(...)
  5. │ │ └─rlang::eval_tidy(...)
  6. │ └─gtsummary::tbl_summary(...)
  7. │   ├─base::structure(...)
  8. │   ├─base::append(...)
  9. │   └─gtsummary::brdg_summary(...)
 10. │     ├─dplyr::left_join(...)
 11. │     ├─dplyr:::left_join.data.frame(...)
 12. │     │ └─dplyr::auto_copy(x, y, copy = copy)
 13. │     │   ├─dplyr::same_src(x, y)
 14. │     │   └─dplyr:::same_src.data.frame(x, y)
 15. │     │     └─base::is.data.frame(y)
 16. │     ├─dplyr::bind_rows(...)
 17. │     │ └─rlang::list2(...)
 18. │     └─gtsummary::pier_summary_continuous2(...)
 19. │       ├─... %>% ...
 20. │       ├─dplyr::bind_rows(...)
 21. │       │ └─rlang::list2(...)
 22. │       ├─dplyr::group_map(...)
 23. │       └─dplyr:::group_map.data.frame(...)
 24. │         └─dplyr:::map2(chunks, group_keys, .f, ...)
 25. │           └─base::mapply(.f, .x, .y, MoreArgs = list(...), SIMPLIFY = FALSE)
 26. │             └─gtsummary (local) `<fn>`(dots[[1L]][[1L]], dots[[2L]][[1L]])
 27. │               ├─dplyr::mutate(...)
 28. │               └─dplyr:::mutate.data.frame(...)
 29. │                 └─dplyr:::mutate_cols(.data, dplyr_quosures(...), by)
 30. │                   ├─base::withCallingHandlers(...)
 31. │                   └─dplyr:::mutate_col(dots[[i]], data, mask, new_columns)
 32. │                     └─mask$eval_all_mutate(quo)
 33. │                       └─dplyr (local) eval()
 34. ├─base::structure(...)
 35. ├─dplyr::left_join(...)
 36. ├─dplyr:::left_join.data.frame(...)
 37. │ └─dplyr::auto_copy(x, y, copy = copy)
 38. │   ├─dplyr::same_src(x, y)
 39. │   └─dplyr:::same_src.data.frame(x, y)
 40. │     └─base::is.data.frame(y)
 41. ├─gtsummary:::map(...)
 42. │ └─base::lapply(.x, .f, ...)
 43. │   └─gtsummary (local) FUN(X[[i]], ...)
 44. │     └─glue::glue(...)
 45. │       └─glue::glue_data(...)
 46. │         └─base::stopifnot(is.environment(.envir))
 47. │           └─base::stop(simpleError(msg, call = if (p <- sys.parent(1L)) sys.call(p)))
 48. └─dplyr (local) `<fn>`(`<smplErrr>`)
 49.   └─rlang::abort(message, class = error_class, parent = parent, call = error_call)
Execution halted