vcr.rpart.train function

Prepare for visualization of an rpart classification on training data.