diff --git a/R/Statial.R b/R/Statial.R index 88207c0..687912e 100644 --- a/R/Statial.R +++ b/R/Statial.R @@ -533,7 +533,7 @@ calcStateChanges <- function(cells, minCellIdx <- cells |> colData() |> as.data.frame() |> - group_by(!!imageID, cellType) |> + group_by(!!imageID, !!cellType) |> mutate(indx = n() > minCells) |> pull(indx)