Skip to content

Commit

Permalink
Update enrich.R
Browse files Browse the repository at this point in the history
  • Loading branch information
guokai8 authored Nov 8, 2024
1 parent 7809b88 commit b662768
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion R/enrich.R
Original file line number Diff line number Diff line change
Expand Up @@ -123,7 +123,7 @@ scgsva <- function(obj, annot = NULL, assay = NULL, slot = "counts",
}
if (!isTRUE(sc.keep)) {
if (is.null(assay)) assay <- "RNA"
empty_counts <- Matrix(0, nrow = 0, ncol = 0, sparse = TRUE)
empty_counts <- Matrix::Matrix(0, nrow = 0, ncol = 0, sparse = TRUE)
empty_counts <- as(as(empty_counts, "generalMatrix"), "CsparseMatrix")

# Assign the empty dgCMatrix to the counts slot in the RNA assay
Expand Down

0 comments on commit b662768

Please sign in to comment.