R/tam_mml_person_SD_EAP.R

Defines functions tam_mml_person_SD_EAP

## File Name: tam_mml_person_SD_EAP.R
## File Version: 0.03


tam_mml_person_SD_EAP <- function( hwt, theta, EAP )
{
    N <- nrow(hwt)
    TP <- ncol(hwt)
    M1 <- matrix(as.vector(theta)^2, nrow=N, ncol=TP, byrow=TRUE)
    SD_EAP <- sqrt( rowSums( hwt * M1 ) - EAP^2 )
    return(SD_EAP)
}

Try the TAM package in your browser

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

TAM documentation built on May 29, 2024, 2:20 a.m.