Mercurial > repos > davidvanzessen > clonal_sequences_in_paired_samples

diff RScript.r @ 65:7a63e90cfc3d draft

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Uploaded
author davidvanzessen
date Mon, 09 Nov 2015 08:19:53 -0500
parents 39fff0180d41
children ef3ac4f431bb
line wrap: on
line diff
--- a/RScript.r	Thu Nov 05 09:07:03 2015 -0500
+++ b/RScript.r	Mon Nov 09 08:19:53 2015 -0500
@@ -527,6 +527,7 @@
   patient3.fuzzy$merge = paste(patient3.fuzzy$locus_V, patient3.fuzzy$locus_J)
 
   patient.fuzzy = rbind(patient1.fuzzy ,patient2.fuzzy, patient3.fuzzy)
+  patient.fuzzy = patient.fuzzy[order(nchar(patient.fuzzy$Clone_Sequence)),]
 
   other.sample.list = list()
   other.sample.list[[oneSample]] = c(twoSample, threeSample)