Description Usage Arguments Value See Also Examples
An S4 method returning the estimates of the model parameters.
1 2 |
object |
An object of class |
type |
Character. If |
labels |
Logical. If |
A numeric vector of class penfa.vector
containing the
estimated model parameters.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | 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")
coef(alasso_fit)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.