# 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=')