Mercurial > repos > big-tiandm > degseq

comparison DEGseq_2.pl @ 8:9c8c0fdb1717 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author big-tiandm
date Fri, 14 Nov 2014 20:37:31 -0500
parents 736f53de6964
children
comparison
equal deleted inserted replaced
7:736f53de6964 8:9c8c0fdb1717
43 print OUT "DEGexp(geneExpMatrix1=geneExpMatrix1, geneCol1=1, expCol1=c(2), groupLabel1=\"$mark1\",geneExpMatrix2=geneExpMatrix2, geneCol2=1, expCol2=c(2), groupLabel2=\"$mark2\",outputDir=outputdir,method=\"MARS\")\n"; 43 print OUT "DEGexp(geneExpMatrix1=geneExpMatrix1, geneCol1=1, expCol1=c(2), groupLabel1=\"$mark1\",geneExpMatrix2=geneExpMatrix2, geneCol2=1, expCol2=c(2), groupLabel2=\"$mark2\",outputDir=outputdir,method=\"MARS\")\n";
44 } 44 }
45 close OUT; 45 close OUT;
46 46
47 47
48 my $re=`which R`;
49 print $re;
48 system("R CMD BATCH $fileout"); 50 system("R CMD BATCH $fileout");
49 51
50 wait; 52 wait;
51 53
52 sub usage{ 54 sub usage{