r prog quiz 2