Plots and R code for the first EDA assignement