foo <- function(x) {
if (missing(x)) {
cat("three")
super::super()
} else {
cat(x)
super::super("deux")
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.