Libardo Lopez RepData_PeerAssessment1