bug fix: expr to relab from resolved conflict

waldronlab · Oct 20, 2023 · 5c6cd67 · 5c6cd67
1 parent ab7d366
commit 5c6cd67
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/R/lefser.R b/R/lefser.R
@@ -290,7 +290,7 @@ lefser <-
     relab_sub <- filterKruskal(relab = relab_data, group = groupf, p.value = kruskal.threshold)
 
     if (!is.null(blockCol)) {
-        block <- as.factor(colData(expr)[[blockCol]])
+        block <- as.factor(colData(relab)[[blockCol]])
         block <- droplevels(block)
         relab_sub <- fillPmatZmat(group = groupf, block = block, relab_sub = relab_sub, p.threshold = wilcox.threshold)
     }