微信公众号搜"智元新知"关注
微信扫一扫可直接关注哦!

如何计算插入符号中准确度和 kappa 的 95% CI

如何解决如何计算插入符号中准确度和 kappa 的 95% CI

我正在使用 caret 包运行 k 次重复训练,并想计算我的准确度指标的置信区间。本教程打印一个插入符号训练对象,显示准确率/kappa 指标和相关的 SD:https://machinelearningmastery.com/tune-machine-learning-algorithms-in-r/。但是,当我这样做时,列出的只是指标平均值。

control <- trainControl(method="repeatedcv",number=10,repeats=3,search="grid")
set.seed(12345)
tunegrid <- expand.grid(.mtry=4)
rf_gridsearch <- train(as.factor(gear)~.,data=mtcars,method="rf",metric="Accuracy",tuneGrid=tunegrid,trControl=control)
print(rf_gridsearch)
> print(rf_gridsearch)
Random Forest 

32 samples
10 predictors
 3 classes: '3','4','5' 

No pre-processing
resampling: Cross-Validated (10 fold,repeated 3 times) 
Summary of sample sizes: 29,28,30,29,27,... 
resampling results:

  Accuracy   Kappa    
  0.8311111  0.7021759

Tuning parameter 'mtry' was held constant at a value of 4

解决方法

看起来它存储在结果对象的结果变量中。

> rf_gridsearch$results
  mtry  Accuracy     Kappa AccuracySD   KappaSD
1    4 0.7572222 0.6046465  0.2088411 0.3387574

使用临界 z 值 1.96 可以找到 95% 的置信区间。

> rf_gridsearch$results$Accuracy+c(-1,1)*1.96*rf_gridsearch$results$AccuracySD
[1] 0.3478936 1.1665509

版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。