我正在做一个SVM,想要找到成本和伽玛的最佳参数 . 问题是运行代码需要永远 . 所以,解决方案是doParallel . 我不知道如何正确设置它 . 你能帮我吗?谢谢 .
#Tuning an RBF SVM through 10-fold cross validation
library(doParallel)
library(foreach)
cl <- makeCluster(2)
registerDoParallel(cl)
foreach (x = 0:3) %dopar% svm_tune <- tune.svm(quality~., data = wine.train,
gamma = 1:x, cost = 1:x)
registerDoSEQ()
summary(svm_tune)