setInteractive <- function(interactivity){
.Call('interactivity', interactivity, PACKAGE="interactivity")
}
.First.lib <-function (lib, pkg) {
library.dynam("interactivity", pkg, lib)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.