> library(ROCR) > library(e1071) svmres.prob <- svm(traindx, traindy, probability=TRUE) svmpred.prob <- predict(svmres.prob, testdx, probability = TRUE, decision.values = TRUE, type="prob")
> print(length(attr(svmpred.prob, "probabilities"))) [1] 0 > print(attr(svmpred.prob, "probabilities")) NULL > print(attributes(svmpred.prob)$decision.values) / 1 -0.54976883 2 -0.19255459 3 -0.05190025 [[alternative HTML version deleted]] ______________________________________________ R-help@r-project.org mailing list https://stat.ethz.ch/mailman/listinfo/r-help PLEASE do read the posting guide http://www.R-project.org/posting-guide.html and provide commented, minimal, self-contained, reproducible code.