przykład 11.3 z punktu 11.2.3
(przykład 11.3 z punktu 11.2.3) : Dokumentowanie i wdrażanie : Tworzenie dokumentacji poszczególnych etapów za pomocą formatu R Markdown : Dokumentowanie danych Buzz i tworzenie modelu za pomocą pakietu knitr
Tytuł: Obliczanie wydajności modelu
rtest <- data.frame(truth = buzztest$buzz,
pred = predict(fmodel, newdata = buzztest, type = "prob")[, 2, drop = TRUE])
print(accuracyMeasures(rtest$pred, rtest$truth))
## [1] "precision= 0.832402234636871 ; recall= 0.84180790960452"
## pred
## truth FALSE TRUE
## 0 584 30
## 1 28 149
## model accuracy f1 dev.norm AUC
## 1 model 0.9266751 0.8370787 0.42056 0.9702102