# NOT RUN {
#generate the genotype and probability tables for a simulation with two resistance
#loci with one dominant and one partial dominant resistant allele, no epistasis, and a
#maximumx resistance value of 10.
ls()
struc_preparation2(Rmx=10, af=c(0.01,0.5), epis=0, dom=c(1,0.3))
ls()
rm(dfgenotype, mf, xprobab)
# }
Run the code above in your browser using DataLab