RepData Assignment 1