adding r scripts still