Update page 'Solutions to the questions concerning R language'

2023-05-22 21:25:29 +02:00
parent c0ff334a7c
commit 0cce1a2e13
1 changed files with 1 additions and 2 deletions
@@ -219,8 +219,7 @@ table(OJ.test$Purchase, test.pred)
 The radial basis kernel with default gamma creates 367 support vectors, out of which, 184 belong to level `𝙲𝙷` and remaining 183 belong to level `𝙼𝙼`. The classifier has a training error of 14.7% and a test error of 15.6% which is a slight improvement over linear kernel. We now use cross validation to find optimal gamma.
 ```
 set.seed(755)
-tune.out = tune(svm, Purchase ~ ., data = OJ.train, kernel = "radial", ranges = list(cost = 10^seq(-2, 
-    1, by = 0.25)))
+tune.out = tune(svm, Purchase ~ ., data = OJ.train, kernel = "radial", ranges = list(cost = 10^seq(-2, 1, by = 0.25)))
 summary(tune.out)
 ```
 ```