Mercurial > repos > iuc > deseq2

diff deseq2.R @ 46:151ed7b41985 draft default tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/main/tools/deseq2 commit 8f0f0f51f30cc630daebfeae8acae93e84dbd35c
author iuc
date Tue, 06 Jan 2026 11:22:10 +0000
parents 702bdf59d6c8
children
line wrap: on
line diff
--- a/deseq2.R	Fri Dec 19 08:09:31 2025 +0000
+++ b/deseq2.R	Tue Jan 06 11:22:10 2026 +0000
@@ -244,7 +244,8 @@
             # Find matching row in sample sheet
             matching_row <- which(sample_sheet[[sample_id_col]] == element_id)
             if (length(matching_row) > 0) {
-                level <- sample_sheet[[factor_name]][matching_row[1]]
+                # Convert level to character to ensure consistent list indexing
+                level <- as.character(sample_sheet[[factor_name]][matching_row[1]])
                 if (!(level %in% names(level_to_files))) {
                     level_to_files[[level]] <- character(0)
                     level_order <- c(level_order, level) # Record order of first appearance