best.R now works correctly