tests/testthat/test-cfa_equivalence.R
In Jo-Karl/ccpsyc: Methods for Cross-Cultural Psychology
test_that("Extracted CFI works", {
model <- "voice =~ voice1m + voice2m + voice3m
help =~ help1m + help2m + help3m"
expect_equal(round(equival(x = model, dat = example, group = "country")$DELTACFI,3) , c(NA, 0.010, 0.029))
})
Jo-Karl/ccpsyc documentation built on Oct. 15, 2022, 3:20 p.m.
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
test_that("Extracted CFI works", {
model <- "voice =~ voice1m + voice2m + voice3m
help =~ help1m + help2m + help3m"
expect_equal(round(equival(x = model, dat = example, group = "country")$DELTACFI,3) , c(NA, 0.010, 0.029))
})
R Package Documentation
Browse R Packages
We want your feedback!
Note that we can't provide technical support on individual packages. You should contact the package authors for that.
Embedding an R snippet on your website
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.