R Programming, Assignment 2