library(R2llvm)
library(rstatic)
library(RTypeInference)
f =
function()
{
n = 2L
x = numeric(n)
x
}
cfg = to_cfg(f)
types = infer_types(cfg)
#m = compile_cfg(f)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.