test to say what will happen in Rstudio