Programming Assignment R Programming