# HG changeset patch
# User davidvanzessen
# Date 1444742416 14400
# Node ID 43ce3ebfc9b574807c680197bdecffc81e82098f
# Parent  ef5ffc8a6e378ccb2018e368fb72b3b9b8028603
Uploaded

diff -r ef5ffc8a6e37 -r 43ce3ebfc9b5 RScript.r
--- a/RScript.r	Tue Oct 13 09:13:24 2015 -0400
+++ b/RScript.r	Tue Oct 13 09:20:16 2015 -0400
@@ -233,7 +233,7 @@
         second.rows.j = table(second.rows$J_Segment_Major_Gene)
         second.rows.j = names(second.rows.j[which.max(second.rows.j)])
 
-        second.sum = data.frame(merge = paste(first.clone.sequence, "*", sep=""),
+        second.sum = data.frame(merge = first.clone.sequence,
                                Patient = patient,
                                Receptor = second.rows[1,"Receptor"],
                                Sample = second.rows[1,"Sample"],