From 92eb7b1c6608e73d53f9f06d467d6f62a1b27585 Mon Sep 17 00:00:00 2001 From: Joesph Beller Date: Thu, 6 Feb 2025 17:48:33 -0600 Subject: [PATCH] Implementing @dcollins15 suggestion --- R/visualization.R | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/R/visualization.R b/R/visualization.R index 50fbb7289..66f53f409 100644 --- a/R/visualization.R +++ b/R/visualization.R @@ -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)