# generate independence model for 3 variables with two groups
lav <- lav_partable_independence(ov.names = list( g1 = c("x1","x2","x3"),
g2 = c("x1","x2","x3") ))
# how many free parameters?
lav_partable_npar(lav)
# how many sample statistics?
lav_partable_ndat(lav)
# how many degrees of freedom?
lav_partable_df(lav)
Run the code above in your browser using DataLab