# NOT RUN {
# load example data and calculate genotype probabilities
file <- paste0("https://raw.githubusercontent.com/rqtl/",
"qtl2data/master/DOex/DOex.zip")
DOex <- read_cross2(file)
probs <- calc_genoprob(DOex, error_prob=0.002)
# inferred genotypes
m <- maxmarg(probs, minprob=0.5)
# inferred SNP genotypes
inferg <- predict_snpgeno(DOex, m)
# }
# NOT RUN {
# }
Run the code above in your browser using DataLab