Displaying 1 result from an estimated 1 matches for "hyda".
Did you mean:
hda
2006 Nov 09
1
Discriminant Analysis- Apparent error rate
R-help,
I'm trying to evaluate the misclasification rate
of an estimated discrimated function (hyDA)
hyDA <- with(hyB, lda(Maturity ~ Length + Weight))
, so here is what I do (code from S-plus 6.1
Guide to Statistics Vol. 2 p 101)
test <- predict(hyDA)
tbl <- table(hyB$Maturity, test$class)
tbl <- tbl[-2,-2]
tbl1 <- cbind(tbl, error = (apply(tbl, 1, sum) - diag(tbl)) /
hyDA$...