# NOT RUN {
# Predict SVM scores
model <- rdbr(toyml)
pred <- predict(model, toyml)
# Passing a specif parameter for SVM predict algorithm
pred <- predict(model, toyml, na.action = na.fail)
# Use the batch mode and increase the max number of iteration to 10
pred <- predict(model, toyml, max.iterations = 10, batch.mode = TRUE)
# Using other classifier (EBR) to made the labels estimatives
estimative <- predict(ebr(toyml), toyml, probability = FALSE)
model <- rdbr(toyml, estimate.models = FALSE)
pred <- predict(model, toyml, estimative = estimative)
# }
Run the code above in your browser using DataLab