"gdsqform"<- function(x, scale = FALSE) { if(scale) x <- scaleto1(x) x/sqrt(apply(x^2, 1, sum)) }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.