## Not run:
# # Create your data
# data(iris)
# x <- subset(iris, select = -Species)
# y <- iris$Species
#
# # Create a model
# model <- parallelSVM(x, y)
#
# # Get prediction
# predictions <- predict(model, x)
#
# # Check the quality
# table(predictions,y)
# ## End(Not run)
Run the code above in your browser using DataLab