cleaning up R code
did not save