adding plots and r scripts