sim.genot.rd function

Simulates genotypes in an island model at equilibrium