# HG changeset patch
# User davidvanzessen
# Date 1389180403 18000
# Node ID 907e2a756f85d8f61f50a1946b85e64087127abe
# Parent  8f5ab5290c883d0a288ccfbaab75f62380b2d964
Uploaded

diff -r 8f5ab5290c88 -r 907e2a756f85 RScript.r
--- a/RScript.r	Tue Dec 10 07:21:31 2013 -0500
+++ b/RScript.r	Wed Jan 08 06:26:43 2014 -0500
@@ -26,7 +26,7 @@
 library(data.table)
 
 
-test = read.table(inFile, sep="\t", header=TRUE, fill=T)
+test = read.table(inFile, sep="\t", header=TRUE, fill=T, comment.char="")
 
 test = test[test$Sample != "",]