pvals=c()
for (i in 1:ncol(my_geno)){
my_pheno=sample(my_pheno,replace=F)
pvals[i]= anova(lm(my_pheno~my_geno[,i]))[1,5]
print(i)
}
which.min(pvals)
pvals=c()
for (i in 1:ncol(my_geno)){
my_pheno=pvals=c()
for (i in 1:ncol(my_geno)){
my_pheno=sample(my_pheno,replace=F)
pvals[i]= anova(lm(my_pheno~my_geno[,i]))[1,5]
print(i)
}
which.min(pvals)
pvals=c()
for (i in 1:ncol(my_geno)){
my_pheno=