Update roast_cor.R

jdreyf · Jul 11, 2024 · ea0355f · ea0355f
1 parent 5c40a22
commit ea0355f
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/roast_cor.R b/R/roast_cor.R
@@ -29,7 +29,7 @@ roast_cor <- function(object, G, feat.tab=NULL, name=NA, phenotype = NULL, desig
             length(weights)<=1 || all(dim(weights)==dim(object)) || 
               length(weights)==nrow(object) || length(weights)==ncol(object),
             is.null(gene.weights) || length(gene.weights)==nrow(object),
-            is.na(name) || rownames(object) %in% rownames(feat.tab))
+            is.na(name) || all(rownames(object) %in% rownames(feat.tab)))
 
   if (!is.null(block) && is.null(correlation))
     stop("!is.null(block), so correlation must not be NULL.")