essai modif dans Rstudio