powered by
genperms(pheno, n.perm = 0)
y <- rbinom(50,2,0.3) genperms(y,4)
Run the code above in your browser using DataLab