Create Code3.r