getAssigns =
function(file, e = parse(file))
{
sapply(e, isSimpleAssign)
}
isSimpleAssign =
function(x)
{
is.call(x) && x[[1]] %in% c("<-", "=") && is.name(x[[2]])
}
findFuns =
function()
{
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.