allelic.richness.rd function

Estimates allelic richness