Repository 'differential_count_models'
hg clone https://testtoolshed.g2.bx.psu.edu/repos/fubar/differential_count_models

Changeset 122:6ded550dcc7d (2014-11-23)
Previous changeset 121:d69a656284f5 (2014-11-23) Next changeset 123:51f998262ada (2014-11-25)
Commit message:
Uploaded
modified:
rgedgeRpaired_nocamera.xml
b
diff -r d69a656284f5 -r 6ded550dcc7d rgedgeRpaired_nocamera.xml
--- a/rgedgeRpaired_nocamera.xml Sun Nov 23 07:06:23 2014 -0500
+++ b/rgedgeRpaired_nocamera.xml Sun Nov 23 07:18:05 2014 -0500
[
@@ -899,7 +899,7 @@
 Count_Matrix = read.table(Input,header=T,row.names=1,sep='\t') 
 snames = colnames(Count_Matrix)
 nsamples = length(snames)
-if (nsubj >  0 & nsubj != nsamples) {
+if (nsubj > 0 & nsubj != nsamples) {
 options("show.error.messages"=T)
 mess = paste('Fatal error: Supplied subject id list',paste(subjects,collapse=','),
    'has length',nsubj,'but there are',nsamples,'samples',paste(snames,collapse=','))
@@ -907,7 +907,7 @@
 quit(save="no",status=4)
 }
 if (length(subjects) != 0) {subjects = subjects[useCols]}
-Count_Matrix = Count_Matrix[,useCols] ### reorder columns
+Count_Matrix = Count_Matrix[,useCols]
 rn = rownames(Count_Matrix)
 islib = rn %in% c('librarySize','NotInBedRegions')
 LibSizes = Count_Matrix[subset(rn,islib),][1] # take first