R/tam_mml_se_quick_difference_quotient.R

Defines functions tam_mml_se_quick_difference_quotient

## File Name: tam_mml_se_quick_difference_quotient.R
## File Version: 0.01


tam_mml_se_quick_difference_quotient <- function(ll, h, pweights )
{
    sum( pweights * ( ll[,2] + ll[,3] - 2*ll[,1] )/h^2 )
}
alexanderrobitzsch/TAM documentation built on Sept. 16, 2024, 2:04 a.m.