Nothing
print.circsizer<-function(x, digits=NULL, ...) {
cat("\nCall:\n\t", deparse(x$call), "\n\nngrid: ", x$ngrid,
"\tlog.scale: ", x$log.scale, "\n\nBandwidths = ", "\n\t", sep = "")
print(x$bw, digits=digits, ...)
}
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.