# HG changeset patch # User davidvanzessen # Date 1426068105 14400 # Node ID 3c2230868300f0c43d935af47f247713b2c66519 # Parent 71a12810eff3647aa792301738e55bb6bf86f72b Uploaded diff -r 71a12810eff3 -r 3c2230868300 merge_and_filter.r --- a/merge_and_filter.r Tue Sep 23 07:50:35 2014 -0400 +++ b/merge_and_filter.r Wed Mar 11 06:01:45 2015 -0400 @@ -47,7 +47,8 @@ result$JGene = gsub("^Homsap ", "", result$J.GENE.and.allele) result$JGene = gsub("[*].*", "", result$JGene) -result$past = paste(result$AA.JUNCTION, result$VGene, result$JGene, (result$FR1.IMGT.Nb.of.mutations + result$CDR1.IMGT.Nb.of.mutations + result$FR2.IMGT.Nb.of.mutations + result$CDR2.IMGT.Nb.of.mutations + result$FR3.IMGT.Nb.of.mutations), result$best_match) +#result$past = paste(result$AA.JUNCTION, result$VGene, result$JGene, (result$FR1.IMGT.Nb.of.mutations + result$CDR1.IMGT.Nb.of.mutations + result$FR2.IMGT.Nb.of.mutations + result$CDR2.IMGT.Nb.of.mutations + result$FR3.IMGT.Nb.of.mutations), result$best_match) +result$past = paste(result$AA.JUNCTION, result$VGene, result$best_match) result = result[!duplicated(result$past), ]