Step Algorimthe de selection automatique des variables biggest <- formula(lm(score~.,cbind(Y_train, X_train))) # important pour la méthode forward step(model, direction = "forward", scope = biggest) direction = "both"/"forward"/"backward"