R/rm_sdt_create_parm_index_rater.R

Defines functions rm_sdt_create_parm_index_rater

## File Name: rm_sdt_create_parm_index_rater.R
## File Version: 0.06


rm_sdt_create_parm_index_rater <- function( est.rater, ND, item.index,
    rater.index)
{
    g1 <- NULL
    if ( est.rater=="a"){ g1 <- seq_len(ND) }
    if ( est.rater=="r"){ g1 <- rater.index }
    if ( est.rater=="i"){ g1 <- item.index }
    if ( est.rater=="e"){ g1 <- rep(1,ND) }
    if ( est.rater=="n"){ g1 <- rep(-999,ND) }
    return(g1)
}

Try the sirt package in your browser

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

sirt documentation built on May 29, 2024, 8:43 a.m.