Accessor for Outcome Models
Examples
data(mindfulness)
exper <- mediation_data(
mindfulness,
phyloseq::taxa_names(mindfulness),
"treatment",
starts_with("mediator"),
"subject"
)
m <- multimedia(exper)
mediation_models(m)
#> NULL