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

> base::assign(".ptime", proc.time(), pos = "CheckExEnv")
> ### Name: rotate_dimensions
> ### Title: Rotate two dimensions (e.g., principal components) of an
> ###   arbitrary angle
> ### Aliases: rotate_dimensions rotate_dimensions,spec_tbl_df-method
> ###   rotate_dimensions,tbl_df-method
> 
> ### ** Examples
> 
> 
>  mtcars_tidy_MDS = reduce_dimensions(mtcars_tidy, car_model, feature, value, method="MDS")
nanny says: to access the raw results do `attr(..., "internals")$MDS`
>  
>  rotate_dimensions(mtcars_tidy_MDS, `Dim1`, `Dim2`, .element = car_model, rotation_degrees = 45)
Error: Can't subset columns that don't exist.
✖ Column `Dim1` doesn't exist.
Backtrace:
     █
  1. ├─nanny::rotate_dimensions(...)
  2. ├─nanny::rotate_dimensions(...)
  3. │ └─nanny:::get_rotated_dimensions(...)
  4. │   └─`%>%`(...)
  5. ├─dplyr::pull(., n)
  6. ├─dplyr::ungroup(.)
  7. ├─dplyr::tally(.)
  8. ├─dplyr::group_by_at(...)
  9. │ └─dplyr:::manip_at(...)
 10. │   └─dplyr:::tbl_at_syms(.tbl, .vars, .include_group_vars = .include_group_vars)
 11. │     └─dplyr:::tbl_at_vars(tbl, vars, .include_group_vars = .include_group_vars)
 12. │       └─dplyr::tbl_vars(tbl)
 13. │         ├─dplyr:::new_sel_vars(tbl_vars_dispatch(x), group_vars(x))
 14. │         │ └─base::structure(...)
 15. │         └─dplyr:::tbl_vars_dispatch(x)
 16. ├─dplyr::distinct(.)
 17. ├─dplyr::select(., !!.element, !!dimension_1_column, !!dimension_2_column)
 18. └─dplyr:::select.data.frame(...)
 19.   └─tidyselect::eval_select(expr(c(...)), .data)
 20.     └─tidyselect:::eval_select_impl(...)
 21.       ├─tidyselect:::with_subscript_errors(...)
 22.       │ ├─base::tryCatch(...)
 23.       │ │ └─base:::tryCatchList(expr, classes, parentenv, handlers)
 24.       │ │   └─base:::tryCatchOne(expr, names, parentenv, handlers[[1L]])
 25.       │ │     └─base:::doTryCatch(return(expr), name, parentenv, handler)
 26.       │ └─tidyselect:::instrument_base_errors(expr)
 27.       │   └─base::withCallingHandlers(...)
 28.       └─tidyselect:::vars_select_eval(...)
 29.         └─tidyselect:::walk_data_tree(expr, data_mask, context_mask)
 30.           └─tidyselect:::eval_c(expr, data_mask, context_mask)
 31.             └─tidyselect:::reduce_sels(node, data_mask, context_mask, init = init)
 32.               └─tidyselect:::walk_data_tree(new, data_mask, context_mask)
 33.                 └─tidyselect:::as_indices_sel_impl(...)
 34.                   └─tidyselect:::as_indices_impl(x, vars, strict = strict)
 35.                     └─tidyselect:::chr_as_locations(x, vars)
 36.                       └─vctrs::vec_as_location(x, n = length(vars), names = vars)
 37.                         └─(function () ...
 38.                           └─vctrs:::stop_subscript_oob(...)
 39.                             └─vctrs:::stop_subscript(...)
Execution halted