## * GENERATE RANDOM ID
#' Generate random individual identifier
#'
#' This function generates a random individual identifier.
#'
#' @family Generate
#'
#' @return A unique eight character long string
#'
#' @examples
#' replicate(10, gen_id())
gen_id <- function() {paste0(sample(c(0:9, letters[1:6]), 8, replace = TRUE), collapse = "")}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.