Update featureHeatmapByCluster.R

coerce sparse matrix to normal matrix
yerkes-gencore · Oct 27, 2023 · a2c6c90 · a2c6c90
1 parent 20ae4d1
commit a2c6c90
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/featureHeatmapByCluster.R b/R/featureHeatmapByCluster.R
@@ -51,7 +51,7 @@ featureHeatmapByCluster <- function(obj,
   }
   DefaultAssay(obj) <- assay
   obj <- obj[feats,]
-  plot_data <- cbind(obj@meta.data, as.data.frame(t(obj[[assay]]@data))) %>%
+  plot_data <- cbind(obj@meta.data, as.data.frame(t(as.matrix(obj[[assay]]@data)))) %>%
     dplyr::group_by(.data[[ cluster_column ]]) %>%
     dplyr::summarize_at(.vars = feats, .funs = median) %>%
     tibble::remove_rownames() %>%