suppressPackageStartupMessages(library(kazaam))
if (comm.rank() == 0){
set.seed(1234)
x = matrix(rnorm(30), 10)
cv = cov(x)
cr = cor(x)
} else {
x = NULL
}
dx = expand(x)
cv_test = cov(dx)
cr_test = cor(dx)
comm.print(all.equal(cv, cv_test))
comm.print(all.equal(cr, cr_test))
finalize()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.