Stop because the rest is just R statistics and graphics