suppressMessages(library(stats)) # for prcomp()
suppressMessages(library(fmlr))
m = 3
n = 2
x = cpumat(m, n)
x$fill_linspace(1, m*n)
xr = x$to_robj()
s = cpuvec()
source("internals/common.r")
source("internals/stats.r")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.