#sample sangerseq object created from abif file
hetsangerseq <- readsangerseq(system.file("extdata",
"heterozygous.ab1",
package = "sangerseqR"))
str(hetsangerseq)
#same for scf files
homosangerseq <- readsangerseq(system.file("extdata",
"homozygous.scf",
package = "sangerseqR"))
str(homosangerseq)
Run the code above in your browser using DataLab