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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: autofilter
> ### Title: Generate filters definition based on the Source data
> ### Aliases: autofilter autofilter.default autofilter.tblist
> 
> ### ** Examples
> 
> library(magrittr)
> library(cohortBuilder)

Attaching package: ‘cohortBuilder’

The following object is masked from ‘package:shinyCohortBuilder’:

    autofilter

The following objects are masked from ‘package:stats’:

    filter, step

> library(shinyCohortBuilder)
> 
> iris_source <- set_source(tblist(iris = iris)) %>%
+   autofilter()
> iris_cohort <- cohort(iris_source)
Error in `map()`:
ℹ In index: 1.
ℹ With name: iris-SepalLength.
Caused by error:
! Can't get S7 properties with `$`. Did you mean `filter@gui`?
Backtrace:
     ▆
  1. ├─cohortBuilder::cohort(iris_source)
  2. │ └─Cohort$new(...) at cohortBuilder/R/cohort_methods.R:1297:3
  3. │   └─cohortBuilder (local) initialize(...)
  4. │     └─private$init_source(source, ...) at cohortBuilder/R/cohort_methods.R:47:9
  5. │       └─cohortBuilder:::run_hooks(hook$post, self, private, ...) at cohortBuilder/R/cohort_methods.R:1266:7
  6. │         └─shinyCohortBuilder (local) hook(...) at cohortBuilder/R/hooks.R:116:7
  7. │           └─public$modify(...)
  8. │             └─shinyCohortBuilder (local) modifier(self, private) at cohortBuilder/R/cohort_methods.R:1212:7
  9. │               └─shinyCohortBuilder:::attach_filters_gui(private$steps[[step_id]])
 10. │                 └─step$filters %>% purrr::modify(attach_filter_gui)
 11. ├─purrr::modify(., attach_filter_gui)
 12. │ └─purrr::map(vec_proxy(.x), .f, ...)
 13. │   └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
 14. │     ├─purrr:::with_indexed_errors(...)
 15. │     │ └─base::withCallingHandlers(...)
 16. │     ├─purrr:::call_with_cleanup(...)
 17. │     └─shinyCohortBuilder (local) .f(.x[[i]], ...)
 18. │       ├─filter$gui
 19. │       └─S7:::`$.S7_object`(filter, "gui")
 20. │         └─base::stop(msg, call. = FALSE)
 21. └─base::.handleSimpleError(...)
 22.   └─purrr (local) h(simpleError(msg, call))
 23.     └─cli::cli_abort(...)
 24.       └─rlang::abort(...)
Execution halted