Hitchhiking of a neutral allele

This r script simulates the hitchhiking effect caused by a successfully invading allele that evolves toward a polymorphic equilibrium. Output applies to figure 2 of the manuscript.