mediate.pd(outcome, mediator, treat, manipulated, data,
NINT = TRUE, sims = 1000, conf.level = 0.95)mediate.pd returns an object of class "mediate.design", a list that contains the components listed below.The function summary (i.e., summary.mediate.design) can be used to obtain a table of the results.
Under the parallel design, the ACME is identified when it is assumed that there is no interaction between the treatment and mediator. Without the assumption the nonparametric sharp bounds can be computed. See Imai, Tingley and Yamamoto (2012) for details.
Imai, K., Keele, L., Tingley, D. and Yamamoto, T. (2011). Unpacking the Black Box of Causality: Learning about Causal Mechanisms from Experimental and Observational Studies, American Political Science Review, Vol. 105, No. 4 (November), pp. 765-789.
Imai, K., Keele, L. and Yamamoto, T. (2010) Identification, Inference, and Sensitivity Analysis for Causal Mediation Effects, Statistical Science, Vol. 25, No. 1 (February), pp. 51-71.
Imai, K., Keele, L., Tingley, D. and Yamamoto, T. (2009) Causal Mediation Analysis Using R" in Advances in Social Science Research Using R, ed. H. D. Vinod New York: Springer.
mediate, summary.mediate.designdata(boundsdata)
bound2 <- mediate.pd("out", "med", "ttt", "manip", boundsdata,
NINT = TRUE, sims = 100, conf.level=.95)
summary(bound2)
bound2.1 <- mediate.pd("out", "med", "ttt", "manip", boundsdata, NINT = FALSE)
summary(bound2.1)Run the code above in your browser using DataLab