R assignment

Assignment2