First Attemp -Programming Assignment 2 Code - R Programming