# HG changeset patch
# User davidvanzessen
# Date 1506341231 14400
# Node ID 20f0df3721aa7cc36766648f87edbd99c0afc06c
# Parent  7ffd0fba8cf4b085dc037936903471d3475fd7db
Uploaded

diff -r 7ffd0fba8cf4 -r 20f0df3721aa RScript.r
--- a/RScript.r	Mon Sep 18 09:01:19 2017 -0400
+++ b/RScript.r	Mon Sep 25 08:07:11 2017 -0400
@@ -112,7 +112,6 @@
   onx = paste(on, ".x", sep="")
   ony = paste(on, ".y", sep="")
   splt = split(x, x$Sample, drop=T)
-  print(splt)
   type="pair"
   if(length(splt) == 1){
     print(paste(paste(x[1,which(colnames(x) == "Patient")]), "has one sample"))