avar_extracted: Function to calculate Average variance extracted (AVE)

In jsaraviadrago/bluegrafir: Psychometric tools for structural equation models and scale comparisons

Description

This function needs a lavaan object with a model fit to work. It calculates the Average variance extracted for CFA models. It is the average of the squared standardized pattern coefficients for indicators that depend on the same factor but are specified to measure no other factors.

Usage

avar_extracted(x)

Arguments

x	lavaan object: The name of the model fit that was calculated from the specified CFA model in the lavaan package.

Value

The output is a data.frame specifying the latent factor in the first column and the AVE in the second column.

Author(s)

Juan Carlos Saravia

See Also

Kline, R. (2016). Principles and Practice of Structural Equation Modeling. Fourth Edition. Guilford press. NY.

Raykov, T. (2004). Behavioral scale realiability and measurement invariance evaluation using latent variable modeling. Behavior therapy, 35, 299-331.

Examples

#' #'set.seed(123456)
data <- data.frame(replicate(10,sample(1:5,1000,rep=TRUE)))

m2 <- 'f=~ X1 + X2 + X3+X4+X5+X6+X7+X8+X9+X10'
fit2 <- lavaan::cfa(m2, data = data)
lavaan::summary(fit2, fit.measures = TRUE,
       standardized = TRUE)
avar_extracted(fit2)

jsaraviadrago/bluegrafir documentation built on July 20, 2020, 3:01 a.m.