Final Project for Coursera Data Cleaning Project in R