R Code and output graphs for Course Project 1