# Aliases for meaningful code -------
fail <- function(x) crayon::red(x)
warn <- function(x) crayon::yellow(x)
mess <- function(x) crayon::green(x)
# c(mess("Three"), warn("little"), fail("birds")) %>% cat()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.