tests/testthat/test-blavaan_suggest.R

In tidySEM: Tidy Structural Equation Modeling

test_that("table_results() works for blavaan", {
  expect_error({
    if(requireNamespace("blavaan", quietly = TRUE)){
      fit <- readRDS("fit.testdata")
      table_results(fit)
    } else {
      tidySEM:::table_results.blavaan("test")
    }
  }, NA)

})