This are my r code and .png files for Exploritory Data Analysis Assessment 1