Return the estimate of Delta_Med in a 'delta_med'-class object.
## S3 method for class 'delta_med'coef(object,...)
Arguments
object: The output of delta_med().
...: Optional arguments. Ignored.
Returns
A scalar: The estimate of Delta_Med.
Details
It just extracts and returns the element delta_med
in the output of delta_med(), the estimate of the Delta_Med proposed by Liu, Yuan, and Li (2023), an R2-like measure of indirect effect.
Examples
library(lavaan)dat <- data_med
mod <-"
m ~ x
y ~ m + x
"
fit <- sem(mod, dat)dm <- delta_med(x ="x", y ="y", m ="m", fit = fit)dm
print(dm, full =TRUE)coef(dm)
References
Liu, H., Yuan, K.-H., & Li, H. (2023). A systematic framework for defining R-squared measures in mediation analysis. Psychological Methods. Advance online publication. https://doi.org/10.1037/met0000571