Nothing
f <- function() g()
g <- function() h()
h <- function() rlang::abort("!")
f()
## Error in `h()`:
## ! !
## Backtrace:
## x
## 1. \-evaluate (local) f()
## 2. \-evaluate (local) g()
## 3. \-evaluate (local) h()
## 4. \-rlang::abort("!")
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.