ProgrammAssigment3 for Coursera course for R