#load data
data(mdr1)
#fit mdr model to a subset of the sample data
fit<-mdr.cv(data=mdr1[,1:11], K=2, cv=5)
#create 'new' data from which to predict
new<-mdr1[,2:11] #same predictor variables, without the response
predict(fit, new.data=new) #predict case/control status for this 'new' data
Run the code above in your browser using DataLab