changeset 7:ba6c6725b12f draft

Uploaded
author davidvanzessen
date Mon, 28 Oct 2013 11:11:46 -0400
parents f9a657db7af5
children 6170fc740bf0
files RScript.r
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/RScript.r	Wed Oct 16 04:30:42 2013 -0400
+++ b/RScript.r	Mon Oct 28 11:11:46 2013 -0400
@@ -33,7 +33,9 @@
 
 PRODF = PROD[ -1]
 
-PRODF = unique(PRODF)
+#PRODF = unique(PRODF)
+PRODF = PRODF[!duplicated(PRODF$VDJCDR3), ]
+
 
 uniqueCount = split(PRODF, f=PRODF[,"Sample"])