Nothing
net.hubs <-
function(theta,nhubs=10)
{
degree = net.degree(theta)
K = length(degree)
hubs = list()
for(k in 1:K)
{
order = order(degree[[k]],decreasing=TRUE)
hubs[[k]] = degree[[k]][order[1:nhubs]]
}
return(hubs)
}
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.