R Programming Assignment #2