Nothing
suppressPackageStartupMessages(library(float))
tol = 1e-6
x = matrix(1:6, 3, 2)
s = fl(x)
test = dbl(rep(s, 5))
truth = rep(x, 5)
stopifnot(all.equal(test, truth, 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.