setwd("sample_files/output/")
expt.name <- "demo"
file.name <- "log_barcodes_observed.fq_sequences.bar_barcode.list.tsv"
barcode_plot(file.name, expt.name)./barcode_split_trim.pl \
--barcode sample_files/barcode.list \
--list \
--outdir sample_files/output \
sample_files/sequences.fq./barcode_split_trim.pl \
--barcode sample_files/barcode.list \
--list \
--outdir sample_files/output \
sample_files/sequences.fq
file_a

