iron <- read_cross2(system.file("extdata", "iron.zip", package="qtl2"))
p <- calc_genoprob(iron, err=0.002)
# genotype frequencies by marker
tab_g <- calc_geno_freq(p, "marker")
# allele frequencies by marker
ap <- genoprob_to_alleleprob(p)
tab_a <- calc_geno_freq(ap, "marker")
Run the code above in your browser using DataLab