R: SVM 2