## Not run:
# # firstly, SVM model needs to be trained
# svm <- SVM(x, y, core="libsvm", kernel="linear", C=1)
# # then we can use it to predict unknown samples
# p <- predcit(svm, x_test)
# acc <- svm.accuracy(p, y)
# ## End(Not run)
Run the code above in your browser using DataLab