R Logic minor update