Nothing
plot.cover <-
function(x, shape = c("square", "circle", "equispaced"), noise = FALSE, pch = 21, cex = max(nchar(rownames(x))) + 2, bg = "white", ...) {
V <- -vertices(x, shape = shape[1], noise = noise)
xlim <- c(min(V$x), max(V$x))*1.3
ylim <- c(min(V$y), max(V$y))*1.3
plot(V, panel.first=drawedges(x, V), axes=FALSE, xlab="", ylab="", xlim=xlim, ylim=ylim, pch = pch, cex = cex, bg = bg, ...)
text(V, labels = rownames(x), cex = 0.75)
}
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.