Update test2.r