"boa.plot.title" <-
function(text)
#-------------------------------------------------------------------------------
#-------------------------------------------------------------------------------
{
mtext(text, line = 1, outer = TRUE, cex = 2)
invisible()
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.