Nothing
layout.ellipsis <-
function(ig, a=1, b=1.5) {
N <- length(V(ig))
# circle angles
ang <- seq(0, 2*pi, length.out=(N+1))[-1]
x <- a*cos(ang)
y <- b*sin(ang)
cbind(x,y)
}
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.