Nothing
f <- function(x) g(x)
g <- function(x) {
h(x)
}
h <- function(x) {
k1(x) + k2(x) + my_var
}
my_var <- 1
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.