R assn2: added comments