Как получить вероятность использования libSVM (пакет e1071) в R?

Question

Я пытаюсь получить вывод вероятности в libSVM (packeage e1071 в R), но выход имеет только TRUE или FALSE с моим набором данных.

Следуйте код:

dadosBrutos<-read.csv("Dataset/circle.data",header = FALSE) 


svm.modelo <- svm(V3 ~ ., 
       data=conjuntoTreinamento, 
       type='C-classification', 
       probability=TRUE) 
       #cost=c, 
       #type='C-classification', 
       #kernel='linear', 
       #scale=FALSE, 
       #verbose=FALSE 
svm.predict <- predict(svm.modelo, 
         subset(conjuntoTreinamento, 
         select = -V3), 
         probability=TRUE) 

posterior <- as.matrix(svm.predict) 

Но, когда я использую набор данных Iris, например, выходная вероятность%, а не имя класса.

library(e1071) 

model <- svm(Species ~ ., data = iris, probability=TRUE) 
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 

Может кто-нибудь помочь мне понять это?

Answer 1

Вы должны извлечь его из атрибутов:

Attr (svm.predict, "вероятности")

SEE: https://stat.ethz.ch/pipermail/r-help/2006-February/088476.html