Code for Predictive Analytics with R