quick fix

mskcc · May 6, 2016 · 5b8199e · 5b8199e
1 parent bb9cf0a
commit 5b8199e
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/filter_ffpe.R b/filter_ffpe.R
@@ -23,8 +23,8 @@ add_mut_tri <- function(maf) {
   ### reverse complement Ref_Tri if ref is either G or A
   maf[Variant_Type == "SNP",
       Ref_Tri := ifelse(Reference_Allele %in% c('G', 'A'),
-                        revc(Ref_Tri),
-                        Ref_Tri)]
+                        revc(TriNuc),
+                        TriNuc)]
   ### reverse complement Tumor_Seq_Allele2 if ref is either G or A
   Tumor_Seq_Allele2_CT <- maf[Variant_Type == "SNP",
                               ifelse(Reference_Allele %in% c('G', 'A'),