Nothing
##==============================================================================
# textellipse: One or several lines of text, in an ellipse
##==============================================================================
textellipse <- function (mid, radx, rady=radx*length(lab), lwd=1,
shadow.size=0.01, adj=c(0.5, 0.5), lab="", box.col="white",
lcol="black", shadow.col="grey", angle=0, dr=0.01, ...) {
shadowbox("ellipse", mid=mid, radx=radx, rady=rady,
shadow.size=shadow.size, shadow.col=shadow.col, box.col=box.col,
lcol=lcol, lwd=lwd, dr=dr, angle=angle)
textplain(mid=mid, height=rady, lab=lab, adj=adj, ...)
}
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.