changeset 44:07278582b735 draft

Uploaded
author davidvanzessen
date Tue, 15 Sep 2015 05:57:27 -0400
parents 2eef2c438500
children 570fef3d876f
files RScript.r
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/RScript.r	Mon Sep 14 11:01:26 2015 -0400
+++ b/RScript.r	Tue Sep 15 05:57:27 2015 -0400
@@ -181,7 +181,8 @@
       
       sample.filter = patient.fuzzy[1,"Sample"] != patient.fuzzy$Sample
       
-      match.filter = merge.filter & grepl(first.clone.sequence, patient.fuzzy$Clone_Sequence) & length.filter & sample.filter
+      #match.filter = merge.filter & grepl(first.clone.sequence, patient.fuzzy$Clone_Sequence) & length.filter & sample.filter
+      match.filter = merge.filter & grepl(first.clone.sequence, patient.fuzzy$Clone_Sequence) & sample.filter
       
       if(sum(match.filter) == 2){
         second.match = which(match.filter)[2]