Second upload

Assignment 2 for R