Настройка аргумента probability на TRUE для обеих подгонки модели и прогноза для каждого предсказания - вектора вероятностей принадлежности к каждому классу переменной ответа. Они сохраняются в матрице как атрибут объекта прогнозирования.
Например:
library(e1071)
model <- svm(Species ~ ., data = iris, probability=TRUE)
# (below I'm just predicting to the training dataset - it could of course just
# as easily be a separate test dataset)
pred <- predict(model, iris, probability=TRUE)
head(attr(pred, "probabilities"))
# setosa versicolor virginica
# 1 0.9803339 0.01129740 0.008368729
# 2 0.9729193 0.01807053 0.009010195
# 3 0.9790435 0.01192820 0.009028276
# 4 0.9750030 0.01531171 0.009685342
# 5 0.9795183 0.01164689 0.008834838
# 6 0.9740730 0.01679643 0.009130620
Обратите внимание, однако, что важно установить probability=TRUE для вызова svm, а не только вызов predict, поскольку только последний будет производить: