ramFit: Fit a model using lavaan based on ram input

In RAMpath: Structural Equation Modeling Using the Reticular Action Model (RAM) Notation

Fit a model using lavaan based on ram input

Description

Fit a model using lavaan based on ram input

Usage

ramFit(ramModel, data, type=c('ram','lavaan'), digits = 3, zero.print = "0", ...)

Arguments

ramModel	An ram model
data	data
type	ram: specify a ram model; lavaan: specify a lavaan model
digits	Digits for print
zero.print	Format of zeros
...	Options for lavaan

Value

A and Ase	A matrix and its standard error
S and Sse	S matrix and its standard error
lavaan	Original lavaan output
fit	Model fit statistics and indices

References

Yves Rosseel (2012). lavaan: An R Package for Structural Equation Modeling. Journal of Statistical Software, 48(2), 1-36. URL http://www.jstatsoft.org/v48/i02/.

Zhang, Z., Hamagami, F., Grimm, K. J., & McArdle, J. J. (2015). Using R package RAMpath for tracing SEM path diagrams and conducting complex longitudinal data analysis. Structural Equation Modeling, 22(1), 132-147. https://doi.org/10.1080/10705511.2014.935257

Examples

## Example 1. A path model
data(ex1)
m1<-'
manifest=3
label=age,hvlt,ept
arrow(2,1)=?
arrow(3,1)=?
arrow(3,2)=?
sling(1,1)=?
sling(2,2)=?
sling(3,3)=?
'

## Fit the model
res1<-ramFit(m1, ex1)

## More output from Lavaan
summary(res1$lavaan, fit=TRUE)

## Effects and variance decomposition
bridge<-ramPathBridge(res1, allbridge=TRUE, indirect=TRUE)
summary(bridge)
summary(bridge, type='bridge')

## plot the path diagram
## uncomment to plot
## plot(bridge, 'ex1')

## plot the effects from age to ept
## uncomment to plot
## plot(bridge, 'ex1effect', 'age','ept')

## plot the bridges for ept
## uncomment to plot
## plot(bridge, 'ex1bridge', 'ept','hvlt', type='bridge')

## summarize
summary(bridge)
summary(bridge, type='bridge')


## Example 2: An SEM model (MIMIC model)
data(ex2)
## Using lavaan directly for model estimation and specification
mimic<-'
R =~ ws1 + ls1 + lt1
R ~ edu + gender
'

mimic.res<-sem(mimic, data=ex2)

mimic.ram<-lavaan2ram(mimic.res)

## plot the path diagram
bridge<-ramPathBridge(mimic.ram, allbridge=FALSE, indirect=FALSE)
## uncomment to plot
## plot(bridge, 'mimic')

RAMpath documentation built on Aug. 27, 2023, 5:06 p.m.