Nothing
.process_dimred <- function(space, rn = rownames(space)) {
space <- as.matrix(space)
dimnames(space) <- list(rn, paste0("comp_", seq_len(ncol(space))))
space
}
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.