# HG changeset patch
# User davidvanzessen
# Date 1415893312 18000
# Node ID 50260274967c7d12466518a5ccd36015cbc73acb
# Parent  24a80d4eff0c425964d8919c95d04855cdeca9e9
Uploaded

diff -r 24a80d4eff0c -r 50260274967c RScript.r
--- a/RScript.r	Thu Nov 13 10:36:33 2014 -0500
+++ b/RScript.r	Thu Nov 13 10:41:52 2014 -0500
@@ -60,7 +60,7 @@
 
 #remove duplicates based on the clonaltype
 if(clonaltype != "none"){
-  PRODF$clonaltype = paste(PRODF[,unlist(strsplit(clonalType, ","))], sep=":")
+  PRODF$clonaltype = paste(PRODF[,unlist(strsplit(clonaltype, ","))], sep=":")
   PRODF = PRODF[!duplicated(PRODF$clonaltype), ]
 }