getLibraries =
function(info)
{
table( unlist(lapply(info, slot, "libraries")))
}
#all.libs = table(unlist(lapply(info, getLibraries)))
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.