# NOT RUN {
cov.mat<- matrix(
c(1.384, 1.484, 1.988, 2.429, 3.031,
1.484, 2.756, 2.874, 3.588, 4.390,
1.988, 2.874, 4.845, 4.894, 6.080,
2.429, 3.588, 4.894, 6.951, 7.476,
3.031, 4.390, 6.080, 7.476, 10.313), nrow=5)
CFA.1(N=300, S=cov.mat, package="lavaan")
CFA.1(N=300, S=cov.mat, package="sem")
# }
Run the code above in your browser using DataCamp Workspace