Introduction to Propensity Score Analysis with R