data(hypoDat)
example.pre.hapassoc<-pre.hapassoc(hypoDat, 3)
names(example.pre.hapassoc$haploDM)
# "h000" "h001" "h010" "h011" "h100" "pooled"
# Logistic regression, baseline group: '001/001'
example.regr <- hapassoc(affected ~ attr + h000+ h010 + h011 + h100 + pooled,
example.pre.hapassoc, family=binomial())Run the code above in your browser using DataLab