R/summary.tam.Q3.R

In TAM: Test Analysis Modules

## File Name: summary.tam.Q3.R
## File Version: 9.04


# summary tam.Q3 method
summary.tam.Q3 <- function( object, ... )
{
    cat("Summary of Q3 and adjusted Q3 statistics (based on WLEs)\n")
    obji <- object$Q3_summary
    obji[, -1 ] <- round( obji[,-1], 4 )
    print(obji)
}
##############################################################