if (FALSE) {
require(adegenet)
## load data
data(nancycats)
## test on genind object, no permutation
hw.test(nancycats, B=0)
## test on loci object
x <- as.loci(nancycats)
hw.test(x)
}
data(jaguar)
hw.test(jaguar)
Run the code above in your browser using DataLab