neg.srmr {negligible}R Documentation

Equivalence Tests for SRMR

Description

Function performs one of four equivalence tests for SRMR fit index.

Usage

neg.srmr(
  mod,
  alpha = 0.05,
  eq.bound,
  modif.eq.bound = FALSE,
  ci.method = "MO",
  usrmr = TRUE,
  nboot = 250L,
  round = 3
)

## S3 method for class 'neg.srmr'
print(x, ...)

Arguments

mod

lavaan model object

alpha

desired alpha level (default = .05)

eq.bound

upper bound of equivalence interval for comparison; must be .05 or .10 if modif.eq.bound = TRUE

modif.eq.bound

should the upper bound of the equivalence interval be modified? (default = FALSE)

ci.method

method used to calculate confidence interval; options are "MO" or "yhy.boot"; "MO" corresponds to (1-2alpha) percent CI, "yhy.boot" corresponds to (1-2alpha) percent boot CI (default = "MO")

usrmr

fit index around which equivalence test should be structured (usrmr = TRUE which is the default states that usrmr from Maydeu-Olivares, 2017 will be used, otherwise srmr from fitmeasures() output in lavaan will be used)

nboot

number of bootstrap samples if "yhy.boot" is selected as ci.method (default = 250L)

round

number of digits to round equivalence bound and confidence interval bounds (default = 3)

x

object of class neg.srmr

...

extra arguments

Details

The user specifies the lavaan fitted model object, the desired equivalence bound, the method of confidence interval computation, and whether unbiased SRMR or original SRMR should be used. By default, the function does not modify the equivalence bounds. The user can also choose to instead run an equivalence test using a modified equivalence bound of .05 or .10 multiplied by the average communality of the observed indicators. Alpha level can also be modified.

For information on unbiased SRMR and its confidence interval computation see Maydeu-Olivares, A. (2017). Maximum likelihood estimation of structural equation models for continuous data: Standard errors and goodness of fit. Structural Equation Modeling: A Multidisciplinary Journal, 24(3), 383-394. https://doi.org/10.1080/10705511.2016.1269606

Value

returns a list including the following:

Author(s)

Rob Cribbie cribbie@yorku.ca and Nataly Beribisky natalyb1@yorku.ca

Examples

d <- lavaan::HolzingerSwineford1939
hs.mod <- 'visual =~ x1 + x2 + x3
textual =~ x4 + x5 + x6
speed =~ x7 + x8 + x9'
fit1 <- lavaan::cfa(hs.mod, data = d)
neg.srmr(mod=fit1,alpha=.05,eq.bound=.08,usrmr = TRUE)

[Package negligible version 0.1.8 Index]