Nothing
suppressPackageStartupMessages(library(pbdDMAT))
init.grid()
dx = ddmatrix("rnorm", 3, 10)
x = as.matrix(dx)
LQ = lq(dx)
Q = as.matrix(lq.Q(LQ))
test = t(qr.Q(qr(t(x))))
comm.print(all.equal(test, Q))
finalize()
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.