data("geneHapR_test")
hap <- filter_hap(hapResult,
rm.mode = c("position", "accession", "haplotype", "freq"),
position.rm = c(4879, 4950),
accession.rm = c("C1", "C9"),
haplotype.rm = c("H009", "H008"),
freq.min = 5)
Run the code above in your browser using DataLab