R file for Exploratory Data Analysis Project 1