Modify best.R