R/lsem_fitsem_joint_estimation_partable_id.R

Defines functions lsem_fitsem_joint_estimation_partable_id

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

lsem_fitsem_joint_estimation_partable_id <- function(partable_gg, partable_mg, vv)
{
    partable_gg[,vv] <- partable_gg[,vv] + max(partable_mg[,vv], na.rm=TRUE)
    return(partable_gg)
}
alexanderrobitzsch/sirt documentation built on March 18, 2024, 1:29 p.m.