Generate lavaan CB-SEM syntax

Usage

sem_lavaan_syntax(model, instrument = NULL, standardised = TRUE)

Arguments

model: An sf_model() object of type "cb_sem".
instrument: Optional sframe object for indicator validation.
standardised: Logical. Adds a standardised-estimates fitting note.

Value

A lavaan syntax string.

Examples

m <- sf_model(
  "cb1", type = "cb_sem",
  constructs = list(
    sf_construct("sq", items = c("sq_1", "sq_2", "sq_3")),
    sf_construct("sat", items = c("sat_1", "sat_2")),
    sf_construct("bi", items = c("bi_1", "bi_2"))
  ),
  paths = list(sf_path("sq", "sat"), sf_path("sat", "bi")),
  indirect = list(sf_indirect("sq", through = "sat", to = "bi"))
)
cat(sem_lavaan_syntax(m))
#> # lavaan CB-SEM syntax generated by surveyframe
#> # Model: cb1
#> # Recommended summary option: standardized = TRUE
#> 
#> sq =~ sq_1 + sq_2 + sq_3
#> sat =~ sat_1 + sat_2
#> bi =~ bi_1 + bi_2
#> 
#> # Structural paths
#> bi ~ sat__bi*sat
#> sat ~ sq__sat*sq
#> 
#> # Indirect and total effects
#> indirect_sq_sat_bi := sq__sat*sat__bi