Revision 4f2efb4ed8831a90968ef063d2403d675c84dae3 authored by Matthias Templ on 26 November 2013, 12:55:44 UTC, committed by cran-robot on 26 November 2013, 12:55:44 UTC
1 parent 2ad963b
print.daFisher.R
print.daFisher <- function(x,...){
cat("--------------------------------------")
cat("\nResults from Fishers discriminant analysis, coda ==", x$coda)
cat("\n- Variance between the classes: \n")
print(x$B)
cat("\n- Variance within the classes: \n")
print(x$W)
cat("\n- Loadings matrix: \n")
print(x$load)
cat("--------------------------------------\n")
}
Computing file changes ...