install.packages("psych")
install.packages("corrplot")
install.packages("corrr")
install.packages("semPlot")
install.packages("latticeExtra")
install.packages("readr")
install.packages("lavaan")
library("semPlot")
library("readr")
library("lavaan")
library("dplyr")
library("psych")
library("corrr")
library("corrplot")
library("haven")
library("semTools")
as.numeric
data1 <- AUDIT_DATOS%>%select(uno, dos , tres, cuatro, cinco, seis , siete , ocho , nueve , diez , Sexo)
modelo0<- '
f1=~ uno + dos + tres
f2 =~ cuatro + cinco + seis
f3 =~ siete + ocho + nueve + diez
'
AnĂ¡lisis de Invarianza 1: Por Sexo
conf1<-cfa(modelo0, orthogonal=FALSE, data= data1, estimator="WLSMV",group="Sexo", ordered =names(data1))
rlang::last_error()
This topic was automatically closed 21 days after the last reply. New replies are no longer allowed.
If you have a query related to it or one of the replies, start a new topic and refer back with a link.