是否有可能从R中的混淆矩阵中检索假阳性和假阴性?

时间:2017-03-04 19:39:48

标签: r r-caret confusion-matrix

我使用R生成了一个混淆矩阵,如下所示。

是否可以从此矩阵中检索假负值61并分配给R中的变量? $ byClass似乎不适合这种情况。 感谢。

Confusion Matrix and Statistics

              Reference
    Prediction   no  yes
           no  9889   61
           yes    6   44

               Accuracy : 0.9933          
                 95% CI : (0.9915, 0.9948)
    No Information Rate : 0.9895          
    P-Value [Acc > NIR] : 4.444e-05       

                  Kappa : 0.5648          
 Mcnemar's Test P-Value : 4.191e-11       

            Sensitivity : 0.9994          
            Specificity : 0.4190          
         Pos Pred Value : 0.9939          
         Neg Pred Value : 0.8800          
             Prevalence : 0.9895          
         Detection Rate : 0.9889          
   Detection Prevalence : 0.9950          
      Balanced Accuracy : 0.7092          

       'Positive' Class : no     

1 个答案:

答案 0 :(得分:5)

您没有在代码中提供可重现的示例或加载任何包,但看起来您正在使用confusionMatrix包中的caret。这是一个通用的例子:

library(caret)

# Fake data
dat = data.frame(measured=rep(0:1, c(40,60)), modeled=rep(c(0:1,0:1), c(30,10,20,40)))

# Generate confusion matrix
cm = confusionMatrix(dat$modeled, dat$measured, positive="1")

cm
Confusion Matrix and Statistics

          Reference
Prediction  0  1
         0 30 20
         1 10 40

               Accuracy : 0.7             
                 95% CI : (0.6002, 0.7876)
    No Information Rate : 0.6             
    P-Value [Acc > NIR] : 0.02478         

                  Kappa : 0.4             
 Mcnemar's Test P-Value : 0.10035         

            Sensitivity : 0.6667          
            Specificity : 0.7500          
         Pos Pred Value : 0.8000          
         Neg Pred Value : 0.6000          
             Prevalence : 0.6000          
         Detection Rate : 0.4000          
   Detection Prevalence : 0.5000          
      Balanced Accuracy : 0.7083          

       'Positive' Class : 1

cm实际上是一个列表,所以让我们看看它包含的内容:

str(cm)

List of 6
 $ positive: chr "1"
 $ table   : 'table' int [1:2, 1:2] 30 10 20 40
  ..- attr(*, "dimnames")=List of 2
  .. ..$ Prediction: chr [1:2] "0" "1"
  .. ..$ Reference : chr [1:2] "0" "1"
 $ overall : Named num [1:7] 0.7 0.4 0.6 0.788 0.6 ...
  ..- attr(*, "names")= chr [1:7] "Accuracy" "Kappa" "AccuracyLower" "AccuracyUpper" ...
 $ byClass : Named num [1:11] 0.667 0.75 0.8 0.6 0.8 ...
  ..- attr(*, "names")= chr [1:11] "Sensitivity" "Specificity" "Pos Pred Value" "Neg Pred Value" ...
 $ mode    : chr "sens_spec"
 $ dots    : list()
 - attr(*, "class")= chr "confusionMatrix"

看起来cm$table有实际的混淆矩阵:

cm$table
          Reference
Prediction  0  1
         0 30 20
         1 10 40

所以误报的数量是:

cm$table[2,1]
[1] 10
相关问题