--
You received this message because you are subscribed to the Google Groups "mirt-package" group.
To unsubscribe from this group and stop receiving emails from it, send an email to mirt-package+unsubscribe@googlegroups.com.
For more options, visit https://groups.google.com/d/optout.
set.seed(1234)N <- 750a <- matrix(rlnorm(10,.3,1),10,1)d <- matrix(rnorm(10), 10)Theta <- matrix(sort(rnorm(N)))pseudoIQ <- Theta * 5 + 100 + rnorm(N, 0 , 5)pseudoIQ <- (pseudoIQ - mean(pseudoIQ))/10 #rescale variable for numerical stabilitygroup <- factor(rep(c('G1','G2','G3'), each = N/3))data <- simdata(a,d,N, itemtype = rep('2PL',10), Theta=Theta)covdata <- data.frame(group, pseudoIQ)#use parallel computingmirtCluster()
mod1 <- mixedmirt(data, covdata, model, fixed = ~ 0 + group + items)--------------RANDOM EFFECT COVARIANCE(S):Correlations on upper diagonal
$Theta ThetaTheta 0.0719>aa <- randef(mod1)var(aa$Theta) ThetaTheta 0.008653158
....
covdata$group <- factor(rep(paste0('G',1:50), each = N/50))
rmod1 <- mixedmirt(data, covdata, 1, fixed = ~ 0 + items, random = ~ 1|group)summary(rmod1)
Call:mixedmirt(data = data, covdata = covdata, model = 1, fixed = ~0 + items, random = ~1 | group)
--------------RANDOM EFFECT COVARIANCE(S):Correlations on upper diagonal
$Theta F1F1 0.0498
$group COV_groupCOV_group 1.08> 1.108 / (1.108+0.0498)[1] 0.9569874Once I saw my own code, I realized as well that I'm basically taking ratios of the same variance of Theta. You are so right, thank you for pointing it out. No more coding after midnight ;)
In any case, elaborating from the mixedmirt() R documentation example:....
covdata$group <- factor(rep(paste0('G',1:50), each = N/50))rmod1 <- mixedmirt(data, covdata, 1, fixed = ~ 0 + items, random = ~ 1|group)summary(rmod1)Call:mixedmirt(data = data, covdata = covdata, model = 1, fixed = ~0 +items, random = ~1 | group)--------------RANDOM EFFECT COVARIANCE(S):Correlations on upper diagonal$ThetaF1F1 0.0498$groupCOV_groupCOV_group 1.08
What I should be doing to get an estimate of the intra class correlaion in this case should be:> 1.108 / (1.108+0.0498)[1] 0.9569874
This should be the correct intra class correlation, right? \
In a related query, I saw your article on "ordinal alpha". Thank-you very much for writing it. It was about time someone did. One thing I was hoping to see were recommendations for applied researchers like myself about which other estimates of reliability are out there when we have ordinal data, particularly binary and 3-point scales. I am used to CFA-based reliability estimates where I fit 1-Factor models to the polychoric or tetrachoric correlation matrix and take the reliability as some ratio of the factor loadings to error variances (like McDonald's omega). Would this approach be more sensible than 'ordinal alpha'? Or is there a better-informed, IRT approach that you would recommend?
--