在我的資料中,我已經能夠創建一個混淆矩陣:
cm<- table(predict(model,newdata=as.matrix(dat2[,-(1:2)])),dat2$r)
cm
## 0 1 2 3 4 5 6 7
## 0 126 0 0 0 0 0 0 0
## 1 3 483 7 1 12 11 8 7
## 2 1 14 1413 1 60 47 53 46
## 3 0 0 0 90 0 0 0 0
## 4 27 92 144 5 6566 308 500 236
## 5 4 24 63 3 129 1899 201 35
## 6 2 14 40 0 82 100 1994 40
## 7 0 0 0 0 0 0 0 375
我如何找到這個混淆矩陣的準確性?或者做 1 - 錯誤率那么我如何找到錯誤率?謝謝你們。
uj5u.com熱心網友回復:
為了準確度
sum(diag(cm))/sum(cm)
轉載請註明出處,本文鏈接:https://www.uj5u.com/qukuanlian/326980.html
