#Example using delta method
ziout=zioutlmmed(outcome=mzipmed_data$ziY1,mediator=mzipmed_data$lmM,
exposure=mzipmed_data$X,confounder=cbind(mzipmed_data$C1,
mzipmed_data$C2),error="Delta",robust=FALSE,X=1,Xstar=0,
zioff=NULL)
#Example using boostrapping, 10 iterations used for succinctness
ziout2=zioutlmmed(outcome=mzipmed_data$ziY1,mediator=mzipmed_data$lmM,
exposure=mzipmed_data$X, confounder=cbind(mzipmed_data$C1,
mzipmed_data$C2),error="Boot",n=10,zioff=NULL)
Run the code above in your browser using DataLab