Update euler_prob16.r