Advertisement
Guest User

Untitled

a guest
Mar 3rd, 2019
88
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ### STAÐFESTANDI ÞÁTTAGREINING ###
  2.  
  3. myModel <- 'f1 =~ L1 + L2 + L3 + L4 + L5 + L6 + L7 + L8 + L9 + L10'
  4. fit1 <- cfa(myModel, data = df3)
  5. summary(fit1)
  6. kable(fitmeasures(fit1, fit.measures = c("chisq", "df", "pvalue", "cfi","tli","srmr")))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement