Nothing
shepard.Unfolding <- function(unf) {
plot(unf$Distances, unf$Disparities)
plot(unf$TransformedAbundances, unf$Distances)
plot(unf$Abundances, unf$Distances)
}
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.