Nothing
library(HPAanalyze)
hpa_histology_data <- hpaDownload(downloadList = "histology",
version = "v20")
hpa_histology_data$metadata <- list(HPAversion = "20",
date = Sys.time(),
packageVersion = "1.9.1")
usethis::use_data(hpa_histology_data, internal = FALSE, overwrite = FALSE)
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.