R/rasch_jml_centerpersons.R

Defines functions rasch_jml_centerpersons

## File Name: rasch_jml_centerpersons.R
## File Version: 0.04

rasch_jml_centerpersons <- function(theta, dat1, centerpersons)
{
    if (centerpersons){
        theta <- theta - stats::weighted.mean( theta, dat1[,2] )
    }
    return(theta)
}

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.