Update Loop Backtest.R