Make factors a data.frame

galaxyproject · Sep 27, 2023 · 4b3d765 · 4b3d765
1 parent c310dae
commit 4b3d765
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/tools/edger/edger.R b/tools/edger/edger.R
@@ -283,7 +283,7 @@ if (!is.null(opt$filesPath)) {
     }
     # order samples as in counts matrix
     factordata <- factordata[match(colnames(counts), factordata[, 1]), ]
-    factors <- sapply(factordata[, -1, drop = FALSE], make.names)
+    factors <- data.frame(sapply(factordata[, -1, drop = FALSE], make.names))
   } else {
     factors <- unlist(strsplit(opt$factInput, "|", fixed = TRUE))
     factordata <- list()