Skip to content

Commit

Permalink
Fixed typo
Browse files Browse the repository at this point in the history
  • Loading branch information
pcamara committed Feb 6, 2024
1 parent 69eb8fa commit e17970d
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion R/mapping.R
Original file line number Diff line number Diff line change
Expand Up @@ -76,7 +76,7 @@ GetTransferMatrix <- function(stvea_object,
stvea_object@codex_mRNA <- as.matrix(stvea_object@transfer_matrix) %*%
as.matrix(stvea_object@cite_mRNA/rowSums(stvea_object@cite_mRNA))
}
if (!is.null(stvea_object@cite_clusters) {
if (!is.null(stvea_object@cite_clusters)) {
cluster_ids <- as.character(unique(stvea_object@cite_clusters))
cluster_ids <- cluster_ids[order(cluster_ids)]
cluster_matrix <- t(sapply(cluster_ids, function(x) (stvea_object@cite_clusters==x)*1))
Expand Down

0 comments on commit e17970d

Please sign in to comment.