removed rstudio project
working script