Nothing
ready <-
function(){setClass("Abstracts", representation(Journal = "character", Abstract = "character",PMID = "numeric"), where = ".GlobalEnv");
setClass("HGNC", representation(HGNCID = "character", ApprovedSymbol = "character", ApprovedName = "character", Status = "character", PreviousSymbols = "character", Aliases = "character", Chromosome = "character", AccessionNumbers = "character", RefSeqIDs = "character"), where = ".GlobalEnv")}
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.