modified R_commands 15092013