Mercurial > repos > iuc > ruvseq
diff get_deseq_dataset.R @ 4:3a083c78896e draft default tip
planemo upload for repository https://github.com/galaxyproject/tools-iuc/tree/master/tools/ruvseq commit 30117fce22f3771c9c0c13e70c3ad14b694de6e2
author | iuc |
---|---|
date | Fri, 21 Apr 2023 14:09:17 +0000 |
parents | fed9d0350d72 |
children |
line wrap: on
line diff
--- a/get_deseq_dataset.R Fri Jul 23 22:37:45 2021 +0000 +++ b/get_deseq_dataset.R Fri Apr 21 14:09:17 2023 +0000 @@ -14,7 +14,7 @@ } } - if (!use_txi & has_header) { + if (!use_txi && has_header) { countfiles <- lapply(as.character(sample_table$filename), read.delim, row.names = 1) tbl <- do.call("cbind", countfiles) colnames(tbl) <- rownames(sample_table) # take sample ids from header @@ -35,7 +35,7 @@ colData = subset(sample_table, select = -filename), design = design_formula ) - } else if (!use_txi & !has_header) { + } else if (!use_txi && !has_header) { # construct the object from HTSeq files dds <- DESeqDataSetFromHTSeqCount(