fitted,penfa-method {penfa}

Model-implied moments for a penfa object

Description

An S4 method returning the model-implied moments for an object of class penfa. For every group, a list with the model-implied moments is returned.

Usage

## S4 method for signature 'penfa'
fitted(object, labels = TRUE)

Arguments

object

An object of class penfa, found as a result of a call to penfa.

labels

Logical. If TRUE, the model-implied moments are named according to the item names used in the model syntax.

Value

A list of the model-implied moments for each group: cov contains the implied covariance matrix, and mean the implied mean vector. If just the covariance matrix is analyzed, only the cov argument is returned.

See Also

penfa, penfa-class

Examples

data(ccdata)

syntax = 'help  =~   h1 + h2 + h3 + h4 + h5 + h6 + h7 + 0*v1 + v2 + v3 + v4 + v5
          voice =~ 0*h1 + h2 + h3 + h4 + h5 + h6 + h7 +   v1 + v2 + v3 + v4 + v5'

alasso_fit <- penfa(## factor model
                    model  = syntax,
                    data   = ccdata,
                    std.lv = TRUE,
                    ## penalization
                    pen.shrink = "alasso",
                    eta = list(shrink = c("lambda" = 0.01), diff = c("none" = 0)),
                    ## automatic procedure
                    strategy = "auto")

fitted(alasso_fit)