irishtt <- HTT(Species ~., data = iris)
## the predicted class
predict(irishtt, type = "response")
## class probabilities
predict(irishtt, type = "prob")
## terminal node identifiers
predict(irishtt, type = "node")
Run the code above in your browser using DataLab