Nothing
as.data.frame.ExpressionSet = function(x, ...) as(x, "data.frame")
setAs("ExpressionSet", "data.frame", function (from)
{
data.frame(t(exprs(from)), pData(from))
})
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.