R/IRT_RMSD_summary_print_statistics.R

Defines functions IRT_RMSD_summary_print_statistics

## File Name: IRT_RMSD_summary_print_statistics.R
## File Version: 0.07

IRT_RMSD_summary_print_statistics <- function( stat_summary, stat, digits)
{
    obji <- stat_summary
    NC <- ncol(obji)
    for (gg in 2:NC ){
        obji[,gg] <- round( obji[,gg], digits=digits)
    }
    print( obji )
    cat("\n")
    obji <- stat
    NC <- ncol(obji)
    for (gg in 2:NC ){
        obji[,gg] <- round( obji[,gg], digits=digits)
    }
    print(obji)
}


summary.IRT.RMSD_print_statistics <- IRT_RMSD_summary_print_statistics

Try the CDM package in your browser

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

CDM documentation built on Aug. 25, 2022, 5:08 p.m.