Hi everyone,
I am very new to the SEM concept and dealing with some of the code problems. Kindly help me out.
Semmodel<- '
Pro=~CP
Fibr=~ADF+Hemicell
Ash=~AC
Mineral=~Mg+P
Herb~Pro+Fibr+Ash+Mineral
'
library(lavaan)
library(semPlot)
Testmodel<- cfa(Semmodel, overall)
summary(Test, rsq= T, standardize=T, fit.measures=T)
fitMeasures(Testmodel, c("chisq", "df", "pvalue", "cfi","ifi","nfi", "rmsea","gfi","SRMR","RMR", "aic","bic"))
chisq df pvalue cfi ifi nfi rmsea gfi srmr rmr aic bic
35.770 7.000 0.000 0.939 0.941 0.928 0.111 0.972 0.046 0.046 6250.561 6330.721
1) I wanted to know about both the standardized and unstandardized coefficient to see the difference as we get in AMOS. But I don't know how to do it in r. Although, I had used the modification indices function for standardizing the rmsea and any changes in the model also increasing the rmsea value.
2) And also I am plotting the model using semPath function. So, I wanted to know if there is any way that r-squared value can be included in sem path diagram.
Regards
Anita Devi