Create 1.r