cacheEnv <- new.env()
setCreds <- function(user,pass){
assign("creds",list(user,pass), envir=cacheEnv)
message("API credentials saved. You may now use package functions.")
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.