powered by
Convenience function to determine the degrees of freedom of a given model provided as lavaan model string. This requires the lavaan package.
semPower.getDf(lavModel)
df
the lavaan model string
if (FALSE) { lavModel <- ' f1 =~ x1 + x2 + x3 + x4 f2 =~ x5 + x6 + x7 + x8 f3 =~ y1 + y2 + y3 f3 ~ f1 + f2 ' semPower.getDf(lavModel) }
Run the code above in your browser using DataLab