fit <- folda(datX = iris[, -5], response = iris[, 5], subsetMethod = "all")
# Predict class labels
predictions <- predict(fit, iris, type = "response")
# Predict class probabilities
prob_predictions <- predict(fit, iris, type = "prob")
Run the code above in your browser using DataLab