# NOT RUN {
data(treeda_example)
out.treeda = treeda(response = treeda_example$response,
predictors = treeda_example$predictors,
tree = treeda_example$tree,
p = 1)
## Here we are predicting on the training data, in general this
## would be done on a held out test set
preds = predict(out.treeda, newdata = treeda_example$predictors,
newresponse = treeda_example$response)
## make a confusion matrix
table(preds$classes, treeda_example$response)
# }
Run the code above in your browser using DataLab