R/eval.js.R

# a JavaScript-like eval function
eval.js <- function(expr, envir=parent.frame(), enclos=if(is.list(envir)||is.pairlist(envir)) parent.frame())
{
  if (typeof(expr) != "character")
    return(expr)

  expr <- parse(text=expr)
  eval(expr, envir, enclos)
}

Try the sendplot package in your browser

Any scripts or data that you put into this service are public.

sendplot documentation built on May 2, 2019, 3:30 p.m.