Nothing
.onAttach <- function(libname, pkgname) {
setHparOptions(hpadata = "hpaNormalTissue")
msg <- paste0("This is hpar version ", utils::packageVersion("hpar"),
",\nbased on the Human Protein Atlas\n",
" Version: ", getHpaVersion(), "\n",
" Release data: ", getHpaDate(), "\n",
" Ensembl build: ", getHpaEnsembl(), "\n",
"See '?hpar' or 'vignette('hpar')' for details.\n")
packageStartupMessage(msg)
}
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.