R/summary.predict.homals.R

Defines functions `summary.predict.homals`

`summary.predict.homals` <-
function(object, ...)
{
# summary method for predict.homals
  cat("\nClassification Tables (observed vs. predicted): \n\n")
  for (i in 1:length(object$cl.table))
  {
    cat("Variable:",names(object$cl.table)[[i]],"\n")
    print(object$cl.table[[i]])
    cat("\n")
  }
}

Try the homals package in your browser

Any scripts or data that you put into this service are public.

homals documentation built on June 10, 2022, 5:09 p.m.