############################################################################################################################
# foo()
# This is a test function
##########################################################################################################################
foo = function(x,a)
{
tmp=testfoo.ischaracter(x)
if(tmp)
cat("Character ", x, " ", a, "\n")
else
cat("Not character", x, "\n")
if(1==0) cat(d)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.