# Modelled on shiny:::createUniqueId
generate_id <- function(bytes, prefix = "", suffix = "") {
paste(prefix,
paste(
format(as.hexmode(
sample(256, bytes, replace = TRUE) - 1), width = 2),
collapse = ""),
suffix, sep = "")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.