R Programming, Assignment 2, Michael Tague