First test from Rstudio