## dummy version to avoid including C code
pointerString <- function(x) {
## .Call(pointer_string, x)
name <- attr(x, "name")
if(is.null(name))
""
else
name
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.