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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: apply_labels
> ### Title: Batch set variable labels
> ### Aliases: apply_labels
> 
> ### ** Examples
> 
> library(crosstable)
> iris %>%
+   apply_labels(Sepal.Length="Length of Sepal",
+                Sepal.Width="Width of Sepal") %>% 
+   crosstable()
Error: Column `x` not found in `.data`
Backtrace:
     █
  1. ├─`%>%`(...)
  2. ├─crosstable::crosstable(.)
  3. │ └─crosstable:::cross_by(...)
  4. │   └─purrr::imap_dfr(...)
  5. │     └─purrr::map2_dfr(.x, vec_index(.x), .f, ..., .id = .id)
  6. │       └─purrr::map2(.x, .y, .f, ...)
  7. │         └─crosstable:::.f(.x[[i]], .y[[i]], ...)
  8. │           └─crosstable:::cross_categorical(...)
  9. │             └─crosstable:::summarize_categorical_single(...)
 10. │               └─`%>%`(...)
 11. ├─dplyr::select(., variable = .data$x, value = .data$value)
 12. ├─dplyr:::select.data.frame(., variable = .data$x, value = .data$value)
 13. │ └─tidyselect::eval_select(expr(c(...)), .data)
 14. │   └─tidyselect:::eval_select_impl(...)
 15. │     ├─tidyselect:::with_subscript_errors(...)
 16. │     │ ├─base::tryCatch(...)
 17. │     │ │ └─base:::tryCatchList(expr, classes, parentenv, handlers)
 18. │     │ │   └─base:::tryCatchOne(expr, names, parentenv, handlers[[1L]])
 19. │     │ │     └─base:::doTryCatch(return(expr), name, parentenv, handler)
 20. │     │ └─tidyselect:::instrument_base_errors(expr)
 21. │     │   └─base::withCallingHandlers(...)
 22. │     └─tidyselect:::vars_select_eval(...)
 23. │       └─tidyselect:::walk_data_tree(expr, data_mask, context_mask)
 24. │         └─tidyselect:::eval_c(expr, data_mask, context_mask)
 25. │           └─tidyselect:::reduce_sels(node, data_mask, context_mask, init = init)
 26. │             └─tidyselect:::walk_data_tree(new, data_mask, context_mask)
 27. │               └─base::eval(expr, data_mask)
 28. │                 └─base::eval(expr, data_mask)
 29. │                   ├─x
 30. │                   └─rlang:::`$.rlang_data_pronoun`(.data, x)
 31. │                     └─rlang:::data_pronoun_get(x, nm)
 32. └─rlang:::abort_data_pronoun(x)
Execution halted