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