add barcode filtering to dedup Rscript and in call from pipeline