if (FALSE) {
# Get the stage C prostate cancer data from the rpart package
library(rpart)
data(stagec)
# Set the options to keep the na
options(na.action='na.pass')
# create a model matrix with all the NA values imputed
stagecImputed <- nearestNeighborImpute(model.matrix(~.,stagec)[,-1])
}
Run the code above in your browser using DataLab