library(RLLVMCompile)
f = function(x) { x }
ty = REALSXPType
fc = compileFunction(f, ty, list(ty), name = "f")
x = rnorm(10)
y = .llvm(fc, x)
stopifnot(identical(x, y))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.