library(CodeAnalysis)
f =
function(x, y)
{
a = x + y
g = function(w)
w + a / x^2
g(300)
}
v = getGlobals(f)
stopifnot(length(v$variables) == 0)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.