test.between.within: Tests the significance of the effect of test.lev on genetic differentiation
Description
Tests, using permutations of rand.unit within units defined by the vector within the significance of the contingency tables allele X (levels of test.lev)
# NOT RUN {data(yangex)
attach(yangex)
#tests for the effect of spop on genetic structuretest.between.within(data.frame(genot),within=pop,test=spop,rand=sspop)
# }