powered by
Calculate the expected number of junctions after t generations, in a backcrossing mating scheme.
number_of_junctions_backcross(H_0 = 0.5, C = 1, t = 100)
Estimated number of junctions at time t
Frequency of heterozygosity at t = 0
Mean number of crossovers per meiosis (e.g. size in Morgan of the chromosome)
Time since admixture
jt <- number_of_junctions_backcross(H_0 = 0.1, C = 1, t = 5)
Run the code above in your browser using DataLab