Nothing
nrm <- function(A){
# makes columnwise normalized version of A
n = dim(A)[1]
m = dim(A)[2]
d = apply(A^2,2,sum)^.5
N = A / (as.matrix(rep(1,n))%*%d)
}
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.