R spam filter using SVM