Corrected "invalid outcome" Error In best.R