R/asider.R

In ColinFay/aside: Send a long R job to be run aside

#' Aside
#'
#' Send a job to be run aside
#'
#' @importFrom rstudioapi getSourceEditorContext
#'
#' @return sends the job aside
#' @export
#'

asider <- function(){
  a <- getSourceEditorContext()
  aside(cmd = a$selection[[1]]$text)
}