Testing R-studio