# NOT RUN {
n <- 100
outcome <- rnorm(n, 0, 1)
trt <- rbinom(n, 1, 0.5)
trt_pxy <- rnorm(n, 0, 1)
out_pxy <- rnorm(n, 0, 1)
covariates <- rnorm(n, 0, 1)
pcl_object <- pcl(outcome, trt, trt_pxy, out_pxy, covariates)
# }
Run the code above in your browser using DataLab