require(GenABEL.data)
data(ge03d2)
dta <- ge03d2[,1:100]
# analysis using linear model
xq <- mlreg.p(bmi~sex,dta)
# logistic regression, type guessed automatically
xb <- mlreg.p(dm2~sex,dta)
# Cox proportional hazards model, assuming that age is the follow-up time
# generally this does not make sense (could be ok if age is age at onset)
xs <- mlreg.p(GASurv(age,dm2)~sex,dta)
Run the code above in your browser using DataLab