## utils
"%||%" <- function(a, b) if(is.null(a)) b else a
.irreversible <- function(reason)
stop("Reversal impossible due to ", reason, ".")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.