# HG changeset patch # User davidvanzessen # Date 1453909711 18000 # Node ID 2a79f9adf89baab7ce56f9feeea4713a0c98508d # Parent 188712b1735fe02e4b75509c6b8e90f72ab4afab Uploaded diff -r 188712b1735f -r 2a79f9adf89b complete_immunerepertoire.xml diff -r 188712b1735f -r 2a79f9adf89b report_clonality/RScript.r --- a/report_clonality/RScript.r Wed Jan 27 10:41:38 2016 -0500 +++ b/report_clonality/RScript.r Wed Jan 27 10:48:31 2016 -0500 @@ -43,6 +43,8 @@ clonality_method = args[8] filter_uniques = args[9] +print(paste("filter_uniques", filter_uniques)) + # ---------------------- Data preperation ---------------------- print("Report Clonality - Data preperation") @@ -64,6 +66,8 @@ filter_uniques = filter_uniques == "yes" && c("CDR1.Seq", "CDR2.Seq", "CDR3.Seq", "FR1.IMGT", "FR2.IMGT", "FR3.IMGT") %in% names(inputdata) +print(paste("filter_uniques", filter_uniques)) + if(filter_uniques){ clmns = names(inputdata)