Nothing
myNMF <- function(Xn, k, L1=1e-10, L2=1e-10){
.normMat(NMF(abs(Xn), J=k, L1_U=L1, L2_U=L2)$U, "column")
}
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.