# NOT RUN {
model <- ctrl(toyml, "RANDOM")
pred <- predict(model, toyml)
# Predict SVM bipartitions running in 6 cores
pred <- predict(model, toyml, probability = FALSE, cores = 6)
# Using the Maximum vote schema
pred <- predict(model, toyml, vote.schema = 'max')
# }
Run the code above in your browser using DataLab