if (FALSE) {
set.seed(123)
model <- fastml(iris, label = "Species")
test_data <- iris[sample(1:150, 20),-5]
## Best model(s) predictions
preds <- predict(model, newdata = test_data)
## Predicted class probabilities using best model(s)
probs <- predict(model, newdata = test_data, type = "prob")
## Prediction from a specific model by name
single_model_preds <- predict(model, newdata = test_data, model_name = "rand_forest (ranger)")
}
Run the code above in your browser using DataLab