From a5069971e21c99142c048ab4101972d49f9add0e Mon Sep 17 00:00:00 2001 From: Ethan Bass Date: Fri, 24 Mar 2023 23:08:42 -0400 Subject: [PATCH] fixed bug in calc_diff_abund_deseq2 allows use of factors for grouping --- R/calculations--differential_abundance.R | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/R/calculations--differential_abundance.R b/R/calculations--differential_abundance.R index 6593924..b95e45a 100644 --- a/R/calculations--differential_abundance.R +++ b/R/calculations--differential_abundance.R @@ -115,7 +115,7 @@ calc_diff_abund_deseq2 <- function(obj, data, cols, groups, other_cols = FALSE, other_cols <- get_taxmap_other_cols(obj, data, cols, other_cols) # Get every combination of groups to compare - combinations <- t(utils::combn(unique(groups), 2)) + combinations <- t(utils::combn(unique(as.character(groups)), 2)) combinations <- lapply(seq_len(nrow(combinations)), function(i) combinations[i, ]) # Format data for DESeq2