Create fibanocci1.R