add svm.R