R Programming: Assgnmt 2