Backtest Overfitting | Translated in R