# NOT RUN {
# Example with data(harvest)
# }
# NOT RUN {
## Phalanx-formation using a base classifier with 50 trees (default = 500)
set.seed(761)
model <- epx(x = harvest[, -4], y = harvest[, 4],
classifier.args = list(ntree = 50))
summary(model)
## The summary agrees with
(model$PHALANXES)[[4]]
# }
Run the code above in your browser using DataLab