This is r-programming assignment-2 Submission