Plot1 R file and PNG

initial commit for assignment 2