Create euler_009.R