modified r1