powered by
snpPairInteraction(pheno, snp1, snp2)
pheno<- round(runif(1000,40,60)) snp1<-round(runif(1000,0,2)) snp2<-round(runif(1000,0,2)) pval=snpPairInteraction(pheno,snp1,snp2)
Run the code above in your browser using DataLab