add previewRd function to RStudio package