Mercurial > repos > yhoogstrate > edger_with_design_matrix

changeset 11:b8b3d63b60ab draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author yhoogstrate
date Thu, 09 Jan 2014 06:48:17 -0500
parents a6ce4b7710d8
children c672e76503b2
files edgeR_DGE.xml
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/edgeR_DGE.xml	Thu Jan 09 05:42:44 2014 -0500
+++ b/edgeR_DGE.xml	Thu Jan 09 06:48:17 2014 -0500
@@ -72,7 +72,11 @@
 for(i in 2:length(raw_data[,1])) {
   print("parsing counts from:")
   print(raw_data[i,1])
-  read_counts = cbind(read_counts,read.delim(as.character(raw_data[i,1]),header=F,stringsAsFactors=F,row.names=1))
+  
+  header = read.delim(as.character(raw_data[i,1]),header=F,stringsAsFactors=F,row.names=1,nrows=1)
+  has_header = (class(header[1,1]) == "character")
+  
+  read_counts = cbind(read_counts,read.delim(as.character(raw_data[i,1]),header=has_header,stringsAsFactors=F,row.names=1))
   print(i)
 }