Create Code.r

update on 2014/6/24