在R中,包probability=TRUE
的svm
功能有e1071
什么功能?
model <- svm (Type ~ ., data, probability=TRUE, cost = 100, gamma = 1)
Run Code Online (Sandbox Code Playgroud)
jba*_*ums 31
对于每个预测,为模型拟合和预测两者设置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
Run Code Online (Sandbox Code Playgroud)
但是请注意,设置probability=TRUE
调用是很重要的svm
,而不仅仅是调用predict
,因为后者本身就会产生:
# setosa versicolor virginica
# 1 0.3333333 0.3333333 0.3333333
# 2 0.3333333 0.3333333 0.3333333
# 3 0.3333333 0.3333333 0.3333333
# 4 0.3333333 0.3333333 0.3333333
# 5 0.3333333 0.3333333 0.3333333
# 6 0.3333333 0.3333333 0.3333333
Run Code Online (Sandbox Code Playgroud)