haplo.interaction(formula, data, SNPs.sel, quantitative =
is.quantitative(formula, data), haplo.freq.min = 0.05, ...)
~
in 'formula' argument) is quantitative. The function
'is.quantitative' returns FALSE when the phenotype
# not Run
# data(SNPs)
# datSNP<-setupSNP(SNPs,6:40,sep="")
# res<-haplo.interaction(log(protein)~int(sex), data=datSNP,
# SNPs.sel=c("snp100019","snp10001","snp100029"))
# res
Run the code above in your browser using DataLab