Test library(adegenet) #6