Back out temporary fix for BPCells matrix dim name loss.

cole-trapnell-lab · Sep 4, 2023 · 5bad7b8 · 5bad7b8
1 parent 4752857
commit 5bad7b8
Showing 1 changed file with 0 additions and 5 deletions.
diff --git a/R/cluster_genes.R b/R/cluster_genes.R
@@ -241,11 +241,6 @@ my.aggregate.Matrix = function (x, groupings = NULL, form = NULL, fun = "sum", .
   mapping <- my.dMcast(groupings2, form)
   colnames(mapping) <- substring(colnames(mapping), 2)
   result <- Matrix::t(mapping) %*% x
-  # The BPCells %*% appears to omit the result column names.
-  # I consider this to be a temporary fix.
-  if(is(x, 'IterableMatrix')) {
-    colnames(result) <- colnames(x)
-  }
   if (fun == "mean")
     result <- result/as.numeric(table(groupings)[rownames(result)])
   attr(result, "crosswalk") <- grr::extract(groupings, match(rownames(result),