lab session three r data analysis 9930696