Skip to content

Commit

Permalink
Implementing @dcollins15 suggestion
Browse files Browse the repository at this point in the history
  • Loading branch information
joesphbeller authored Feb 6, 2025
1 parent 0cd32f6 commit 92eb7b1
Showing 1 changed file with 1 addition and 2 deletions.
3 changes: 1 addition & 2 deletions R/visualization.R
Original file line number Diff line number Diff line change
Expand Up @@ -4700,8 +4700,7 @@ GroupCorrelationPlot <- function(
cor = "nCount_RNA_cor"
) {
assay <- assay %||% DefaultAssay(object = object)
try(data <- object[[assay]]@meta.data[, c(feature.group, cor)], silent=T)
try(data <- object[[assay]]@meta.features[, c(feature.group, cor)], silent=T)
data <- object[[assay]][[c(feature.group, cor)]]
data <- data[complete.cases(data), ]
colnames(x = data) <- c('grp', 'cor')
data$grp <- as.character(data$grp)
Expand Down

0 comments on commit 92eb7b1

Please sign in to comment.