f =
function(i)
{
x = switch(i,
'2' = 12,
'3' = i * 1.5,
'8' = i/2)
x
}
library(R2llvm)
fc = compileFunction(f)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.