alleleinit function

Diploid loci matrix initialization