clonotypes <- read_clonotypes(system.file('extdata', 'clonotypes.txt.gz', package = "clonotypeR"))
clonotypes <- clonotype_table(levels(clonotypes$lib), data=clonotypes)
private_clonotypes("C", data=clonotypes)
Run the code above in your browser using DataLab