在使用Caret软件包进行机器学习时,我对Caret的默认"积极"结果选择,即二元分类问题中结果因素的第一级。
包说它可以设置为替代级别。任何人都可以帮我确定积极的结果吗?
感谢你
答案 0 :(得分:16)
看看这个例子。使用confusionMatrix从插入示例扩展了这一点。
lvs <- c("normal", "abnormal")
truth <- factor(rep(lvs, times = c(86, 258)),
levels = rev(lvs))
pred <- factor(
c(
rep(lvs, times = c(54, 32)),
rep(lvs, times = c(27, 231))),
levels = rev(lvs))
xtab <- table(pred, truth)
str(truth)
Factor w/ 2 levels "abnormal","normal": 2 2 2 2 2 2 2 2 2 2 ...
因为异常是第一级,这将是默认的正类
confusionMatrix(xtab)
Confusion Matrix and Statistics
truth
pred abnormal normal
abnormal 231 32
normal 27 54
Accuracy : 0.8285
95% CI : (0.7844, 0.8668)
No Information Rate : 0.75
P-Value [Acc > NIR] : 0.0003097
Kappa : 0.5336
Mcnemar's Test P-Value : 0.6025370
Sensitivity : 0.8953
Specificity : 0.6279
Pos Pred Value : 0.8783
Neg Pred Value : 0.6667
Prevalence : 0.7500
Detection Rate : 0.6715
Detection Prevalence : 0.7645
Balanced Accuracy : 0.7616
'Positive' Class : abnormal
要更改为正类=正常,只需在confusionMatrix中添加它。注意与先前输出的差异,差异开始出现在灵敏度和其他计算上。
confusionMatrix(xtab, positive = "normal")
Confusion Matrix and Statistics
truth
pred abnormal normal
abnormal 231 32
normal 27 54
Accuracy : 0.8285
95% CI : (0.7844, 0.8668)
No Information Rate : 0.75
P-Value [Acc > NIR] : 0.0003097
Kappa : 0.5336
Mcnemar's Test P-Value : 0.6025370
Sensitivity : 0.6279
Specificity : 0.8953
Pos Pred Value : 0.6667
Neg Pred Value : 0.8783
Prevalence : 0.2500
Detection Rate : 0.1570
Detection Prevalence : 0.2355
Balanced Accuracy : 0.7616
'Positive' Class : normal
答案 1 :(得分:2)
改变正类:
一种有效的方法是重新调整目标变量。
例如: 在威斯康星州乳腺癌数据集中,默认诊断级别是默认正类的基础。诊断参考水平为:
cancer<-read.csv("breast-cancer-wisconsin.csv")
cancer$Diagnosis<-as.factor(cancer$Diagnosis)
levels(cancer$Diagnosis)
[1] "Benign" "Malignant"
在执行测试训练拆分和模型拟合后。得到的混淆矩阵和性能度量为:
Confusion Matrix and Statistics
predicted Actual
Benign Malignant
Benign 115 7
Malignant 2 80
Accuracy : 0.9559
95% CI : (0.9179, 0.9796)
No Information Rate : 0.5735
P-Value [Acc > NIR] : <2e-16
Kappa : 0.9091
Mcnemar's Test P-Value : 0.1824
Sensitivity : 0.9829
Specificity : 0.9195
Pos Pred Value : 0.9426
Neg Pred Value : 0.9756
Prevalence : 0.5735
Detection Rate : 0.5637
Detection Prevalence: 0.5980
Balanced Accuracy : 0.9512
'Positive' Class : Benign
需要注意的是 **Positive Class 是良性的"
可以使用 relevel()
函数将 Positive Class 更改为“Malignant”。 relevel()
改变了变量的参考水平。
cancer$Diagnosis <- relevel(cancer$Diagnosis, ref = "Malignant")
levels(cancer$Diagnosis)
[1] "Malignant" "Benign"
再次执行测试训练拆分和模型拟合后,随着参考变化的混淆矩阵性能精度为:
Confusion Matrix and Statistics
predicted Actual
Malignant Benign
Malignant 80 2
Benign 7 115
Accuracy : 0.9559
95% CI : (0.9179, 0.9796)
No Information Rate : 0.5735
P-Value [Acc > NIR] : <2e-16
Kappa : 0.9091
Mcnemar's Test P-Value : 0.1824
Sensitivity : 0.9195
Specificity : 0.9829
Pos Pred Value : 0.9756
Neg Pred Value : 0.9426
Prevalence : 0.4265
Detection Rate : 0.3922
Detection Prevalence : 0.4020
Balanced Accuracy : 0.9512
'Positive' Class : Malignant
这里的阳性类别是恶性