set.seed(1)
N <- 50
urosdata <- data.frame(
x = sample(letters, N, replace = TRUE),
v = rnorm(N)
)
usethis::use_data(urosdata, overwrite = TRUE)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.