Mercurial > repos > davidvanzessen > report_clonality_igg

diff RScript.r @ 17:ff84987df4f8 draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author davidvanzessen
date Tue, 16 Dec 2014 03:28:57 -0500
parents c6d0ee9b3d91
children c5256a227d2d
line wrap: on
line diff
--- a/RScript.r	Mon Dec 08 05:21:51 2014 -0500
+++ b/RScript.r	Tue Dec 16 03:28:57 2014 -0500
@@ -60,7 +60,7 @@
 
 #remove duplicates based on the clonaltype
 if(clonaltype != "none"){
-  PRODF$clonaltype = do.call(paste, c(test[unlist(strsplit(clonaltype, ","))], sep = ":"))
+  PRODF$clonaltype = do.call(paste, c(PRODF[unlist(strsplit(clonaltype, ","))], sep = ":"))
   PRODF = PRODF[!duplicated(PRODF$clonaltype), ]
 }