# HG changeset patch
# User fubar
# Date 1374971756 14400
# Node ID b1cf0745bde570aec5cd21c33f9020bae164ae0b
# Parent cddf60746340f2552e277ff12097b50ae9b6493e
Uploaded
diff -r cddf60746340 -r b1cf0745bde5 rgedgeR/rgedgeRpaired.xml
--- a/rgedgeR/rgedgeRpaired.xml Sat Jul 27 04:19:51 2013 -0400
+++ b/rgedgeR/rgedgeRpaired.xml Sat Jul 27 20:35:56 2013 -0400
@@ -61,20 +61,20 @@
label="Run the same model with DESeq2 and compare findings"
help="DESeq2 is an update to the DESeq package. It uses different assumptions and methods to edgeR">
-
+
-
-
+
+
+ help="Voom uses counts per million and a precise transformation of variance so count data can be analysed using limma">
@@ -691,6 +691,12 @@
edgeR_priordf = $edgeR.edgeR_priordf
#end if
+if (sum(c(doedgeR,doVoom,doDESeq2)) == 0)
+{
+write("No methods chosen - nothing to do! Please try again after choosing one or more methods", stderr())
+quit(save="no")
+}
+
Out_Dir = "$html_file.files_path"
Input = "$input1"
TreatmentName = "$treatment_name"
@@ -706,12 +712,6 @@
myTitle = "$title"
subjects = c($subjectids)
nsubj = length(subjects)
-if (nsubj > 0) {
-if (doDESeq2) {
- print('WARNING - cannot yet use DESeq2 for 2 way anova - see the docs')
- doDESeq2 = F
- }
-}
TCols = as.numeric(strsplit(TreatmentCols,",")[[1]])-1
CCols = as.numeric(strsplit(ControlCols,",")[[1]])-1
cat('Got TCols=')