make_function <- function(body,
arg_list,
env = parent.frame()) {
f <- function() {}
formals(f) <- arg_list
body(f) <- body
environment(f) <- env
return(f)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.