Update best.R

Correction of naming