best()
rewrote best.r