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

> ### Name: aggregate_cells
> ### Title: Aggregate cells
> ### Aliases: aggregate_cells aggregate_cells,Seurat-method
> 
> ### ** Examples
> 
> data(pbmc_small)
> pbmc_small_pseudo_bulk <- pbmc_small |>
+   aggregate_cells(c(groups, letter.idents), assays="RNA")
Error in `mutate()`:
ℹ In argument: `data = map(...)`.
Caused by error in `map()`:
ℹ In index: 1.
Caused by error in `getClassDef(x@superClass, package = packageSlot(x))@virtual`:
! no applicable method for `@` applied to an object of class "NULL"
Backtrace:
     ▆
  1. ├─ttservice::aggregate_cells(...)
  2. ├─tidyseurat::aggregate_cells(...)
  3. │ ├─tidyseurat:::drop_class(...)
  4. │ ├─dplyr::select(...)
  5. │ └─... %>% ...
  6. ├─tidyr::unite(., ".sample", !!.sample, sep = "___", remove = FALSE)
  7. ├─tidyr::unnest(., data)
  8. ├─dplyr::left_join(., .data %>% as_tibble() %>% subset_tidyseurat(!!.sample))
  9. ├─dplyr::mutate(...)
 10. ├─dplyr::mutate(., .aggregated_cells = map_int(data, ~ncol(.x)))
 11. ├─tidyr::nest(., data = -!!.sample)
 12. ├─tidyseurat:::nest.Seurat(., data = -!!.sample)
 13. │ ├─tidyseurat:::add_class(...)
 14. │ │ └─name %in% class(var)
 15. │ └─my_data__ %>% to_tib %>% tidyr::nest(...) %>% ...
 16. ├─dplyr::mutate(...)
 17. ├─dplyr:::mutate.data.frame(...)
 18. │ └─dplyr:::mutate_cols(.data, dplyr_quosures(...), by)
 19. │   ├─base::withCallingHandlers(...)
 20. │   └─dplyr:::mutate_col(dots[[i]], data, mask, new_columns)
 21. │     └─mask$eval_all_mutate(quo)
 22. │       └─dplyr (local) eval()
 23. ├─purrr::map(...)
 24. │ └─purrr:::map_("list", .x, .f, ..., .progress = .progress)
 25. │   ├─purrr:::with_indexed_errors(...)
 26. │   │ └─base::withCallingHandlers(...)
 27. │   ├─purrr:::call_with_cleanup(...)
 28. │   └─tidyseurat (local) .f(.x[[i]], ...)
 29. │     └─my_data__ %>% filter(.cell %in% pull(.x, .cell)) %>% ...
 30. ├─dplyr::select(., colnames(.x))
 31. ├─dplyr::filter(., .cell %in% pull(.x, .cell))
 32. ├─tidyseurat:::filter.Seurat(., .cell %in% pull(.x, .cell))
 33. │ ├─subset(.data, cells = rownames(new_meta)) %>% ...
 34. │ ├─base::subset(.data, cells = rownames(new_meta))
 35. │ └─SeuratObject:::subset.Seurat(.data, cells = rownames(new_meta))
 36. │   ├─base::suppressWarnings(...)
 37. │   │ └─base::withCallingHandlers(...)
 38. │   ├─SeuratObject::as.Graph(x = x[[g]][cells.g, cells.g, drop = FALSE])
 39. │   ├─x[[g]][cells.g, cells.g, drop = FALSE]
 40. │   └─x[[g]][cells.g, cells.g, drop = FALSE]
 41. │     └─Matrix:::.subscript.2ary(x, i, j, drop = drop)
 42. │       └─Matrix:::..subscript.2ary(x, l[[1L]], l[[2L]], drop = drop[1L])
 43. ├─tidyseurat:::clean_seurat_object(.)
 44. │ └─methods::.hasSlot(.data, "images")
 45. ├─methods::.selectSuperClasses(...)
 46. │ └─base::vapply(ext, F, NA, USE.NAMES = FALSE)
 47. │   └─methods (local) FUN(X[[i]], ...)
 48. │     └─methods (local) isVirtualExt(exti)
 49. └─base::.handleSimpleError(...)
 50.   └─purrr (local) h(simpleError(msg, call))
 51.     └─cli::cli_abort(...)
 52.       └─rlang::abort(...)
Execution halted