Update Result.R