hetsangerseq <- readsangerseq(system.file("extdata",
"heterozygous.ab1",
package = "sangerseqR"))
hetcalls <- makeBaseCalls(hetsangerseq, ratio = 0.33)
Run the code above in your browser using DataLab