GSE

zhezhangsh · zhezhangsh · commit f69b4e139dfc · 2016-02-14T11:01:23.000-05:00
diff --git a/R/TestGSE.R b/R/TestGSE.R
@@ -113,7 +113,7 @@ WrapGSE<-function(stat, anno, split.collection=FALSE, output=getwd()) {
     names(fn)<-src;
   }
   
-  saveRDS(tbl0, file=paste(output, paste(prefix, '_All_Sig.rds', sep=''), sep='/'));
+  saveRDS(tbl0, file=paste(output, 'GSE_All_Sig.rds', sep='/'));
   
   list(all=tbl0, formatted=tbls, file=fn); 
 }

Original file line number	Diff line number	Diff line change
`@@ -113,7 +113,7 @@ WrapGSE<-function(stat, anno, split.collection=FALSE, output=getwd()) {`
`113`	`113`	`names(fn)<-src;`
`114`	`114`	`}`
`115`	`115`
`116`		`- saveRDS(tbl0, file=paste(output, paste(prefix, '_All_Sig.rds', sep=''), sep='/'));`
	`116`	`+ saveRDS(tbl0, file=paste(output, 'GSE_All_Sig.rds', sep='/'));`
`117`	`117`
`118`	`118`	`list(all=tbl0, formatted=tbls, file=fn);`
`119`	`119`	`}`