Causal Inference with observational data in R