Nothing
#
#
# ## load data from an input
#
# ds <-
# list(
# predictions = function()readRDS("predictions.rds"),
# finegrid=function()return(NULL),
# eta = function()readRDS("etas.rds"),
# estimates = function()readRDS("etas.rds"),
# )
#
# ctr <- theophylline()
#
# ctr %>% get_data("eta")
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.