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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: prepare_data
> ### Title: Create one or more quantitative scenarios objects suitable for
> ###   simulation by 'evaluator'
> ### Aliases: prepare_data
> 
> ### ** Examples
> 
> suppressPackageStartupMessages(library(dplyr))
> data(mc_domains, mc_capabilities, mc_scenarios, mc_sme_top_domains,
+      calibration_questions, mc_threat_communities)
> question_set <- tidyrisk_question_set(mc_domains, mc_scenarios, mc_capabilities,
+                           calibration_questions, mc_sme_top_domains,
+                           mc_threat_communities)
> response_set <- tidyrisk_response_set(mc_calibration_answers,
+                           mc_scenario_answers, mc_capability_answers)
> sme_weightings <- generate_weights(question_set, response_set)
> data(mc_scenario_parameters_fitted, mc_capability_parameters_fitted,
+                           mc_threat_parameters_fitted)
> scenario_parameters <- left_join(mc_scenario_parameters_fitted, sme_weightings, by = "sme") %>%
+   combine_scenario_parameters()
Warning: All elements of `...` must be named.
Did you want `data = c(meanlog, sdlog, weight, min, max)`?
Warning: The `.drop` argument of `unnest()` is deprecated as of tidyr 1.0.0.
All list-columns are now preserved.
This warning is displayed once per session.
Call `lifecycle::last_warnings()` to see where this warning was generated.
Warning: All elements of `...` must be named.
Did you want `data = c(meanlog, sdlog, weight, min, max)`?
> capability_parameters <- left_join(mc_capability_parameters_fitted, sme_weightings, by = "sme") %>%
+   combine_capability_parameters()
Warning: All elements of `...` must be named.
Did you want `data = c(mean, sd, weight, min, max)`?
> quantitative_scenarios <- prepare_data(scenario_parameters,
+                                        capability_parameters,
+                                        mc_threat_parameters_fitted,
+                                        question_set)
Error: Column `frequency_func` not found in `.data`
Backtrace:
     x
  1. +-collector::prepare_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. |       \-collector:::`_fseq`(`_lhs`)
  7. |         \-magrittr::freduce(value, `_function_list`)
  8. |           \-function_list[[i]](value)
  9. |             +-dplyr::select(...)
 10. |             \-dplyr:::select.grouped_df(...)
 11. |               \-dplyr:::.select_grouped_df(.data, !!!enquos(...), notify = TRUE)
 12. |                 \-tidyselect::vars_select(tbl_vars(.data), !!!enquos(...))
 13. |                   \-tidyselect:::vars_select_eval(.vars, quos)
 14. |                     \-purrr::map_if(quos, !is_helper, eval_tidy, mask)
 15. |                       \-purrr::map(.x[sel], .f, ...)
 16. |                         \-rlang:::.f(.x[[i]], ...)
 17. +-frequen
Execution halted