Update best.R

Copyright added