R scripts and plots for pa1 exploring data