#' Store user and database information
#'
#' These are internal functions
#' @param str the ID that the user logged into the tutorial with
# submitr_env <- new.env()
#
# store_ID <- function(str) {
# if(is.null(str)) str <- "anonymous"
# cat("Storing ID", str, "\n")
# submitr_env$user_ID <- str
# }
#
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.