#Example using delta method
ziout=zioutbinmed(outcome=mzipmed_data$ziY2,mediator=mzipmed_data$binM,
exposure=mzipmed_data$X,confounder=cbind(mzipmed_data$C1,
mzipmed_data$C2),error="Delta",robust=FALSE,X=1,Xstar=0,zioff=NULL)
if (FALSE) {
#Example using bootstrapping with 10 iterations
ziout2=zioutbinmed(outcome=mzipmed_data$ziY2,mediator=mzipmed_data$binM,
exposure=mzipmed_data$X,confounder=cbind(mzipmed_data$C1,
mzipmed_data$C2),error="Boot",n=10,C=c(0,0.5),zioff=NULL)
}
Run the code above in your browser using DataLab