Update code2.r