#!/usr/bin/env r
# function to be called at exit
.Last <- function() { cat("Really done, so bye-bye from .Last\n") }
# imagine we're doing something now...
# end, and .Last is now called
q(status=42)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.