R/xxirt_parTheta_extract_freeParameters.R

Defines functions xxirt_parTheta_extract_freeParameters

## File Name: xxirt_parTheta_extract_freeParameters.R
## File Version: 0.08


xxirt_parTheta_extract_freeParameters <- function( customTheta )
{
    ind <- customTheta$est
    p1 <- customTheta$par[ ind ]
    names(p1) <- names(customTheta$par)[ind]
    return(p1)
}
alexanderrobitzsch/sirt documentation built on Sept. 8, 2024, 2:45 a.m.