Nothing
suppressPackageStartupMessages(library(float))
set.seed(1234)
tol = 1e-6
x = crossprod(matrix(stats::rnorm(30), 10))
xs = fl(x)
test = dbl(chol(xs))
stopifnot(all.equal(test, chol(x), tol=tol))
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.