Update euler_021_1.R