Create euler_003.R