https://www.tandfonline.com/doi/abs/10.1080/10705511.2017.1389611
When I use lavResiduals I get the unbiased SRMR (or CRMR, etc.) and SE but not the Z-test or p-value.
HS.model <- ' visual =~ x1 + x2 + x3
textual =~ x4 + x5 + x6
speed =~ x7 + x8 + x9 '
fit <- cfa(HS.model, data = HolzingerSwineford1939)
R <- lavResiduals(fit)
R$summary$usrmr.z <- R$summary$usrmr / R$summary$usrmr.se
R$summary$usrmr.pvalue <- 2*pnorm(-R$summary$usrmr.z)
RIs there a way to customize the function so that I get the test info for the unbiased estimate rather than only the biased sample SRMR?
myResids <- function(object) {
R <- lavResiduals(object)
R$summary$usrmr.z <- R$summary$usrmr / R$summary$usrmr.se
R$summary$usrmr.pvalue <- 2*pnorm(-R$summary$usrmr.z)
R
}
myResids(fit)--
You received this message because you are subscribed to a topic in the Google Groups "lavaan" group.
To unsubscribe from this topic, visit https://groups.google.com/d/topic/lavaan/m-GUry6C3yE/unsubscribe.
To unsubscribe from this group and all its topics, send an email to lavaan+un...@googlegroups.com.
To view this discussion on the web visit https://groups.google.com/d/msgid/lavaan/72cfc3ce-250f-4cd8-8255-2f1adc5a1d77%40googlegroups.com.
I am curious what 'mean' and 'total' refer to?