isPoly function

Assess polymorphism in genind/genpop objects