Testing RStudio Hookup