simsem (version 0.4-6)

getExtraOutput: Get extra outputs from the result of simulation

Description

Get extra outputs from a simulation result object (SimResult). Users can ask this package to extra output from the lavaan object in each iteration by setting the outfun argument (in the sim function). See the example below.

Usage

getExtraOutput(object, improper = FALSE)

Arguments

object

SimResult that have the extra output extracted by the function defined in the outfun argument (in the sim function)

improper

If TRUE, include the replications that provided improper solutions

Value

• A list of extra outputs

See Also

• simA function to run a Monte Carlo simulation

Examples

loading <- matrix(0, 6, 1)
loading[1:6, 1] <- NA
LY <- bind(loading, 0.7)
RPS <- binds(diag(1))
RTE <- binds(diag(6))
CFA.Model <- model(LY = LY, RPS = RPS, RTE = RTE, modelType="CFA")

# Write a function to extract the modification index from lavaan object
outfun <- function(out) {
	result <- inspect(out, "mi")
}

# We will use only 5 replications to save time.
# In reality, more replications are needed.
Output <- sim(5, n=200, model=CFA.Model, outfun=outfun)

# Get the modification index of each replication
getExtraOutput(Output)