set_r_4