我正在做一个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)