create <- function(n) { saveRDS(runif(n), "numbers.rds") } use <- function(i) { d <- readRDS("numbers.rds") d[[i]] }
Add the following code to your website.
REMOVE THIS Copy to clipboard
For more information on customizing the embed code, read Embedding Snippets.