diff edgeR_DGE.xml @ 11:b8b3d63b60ab draft

Uploaded
author yhoogstrate
date Thu, 09 Jan 2014 06:48:17 -0500
parents 61e42740b13a
children c672e76503b2
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)
 }