#' NONCE
#'
#' Unique Increasing Timestamp.
#' @keywords nonce,timestamp
#' @examples
#' NONCE()
NONCE<-function(){
return(as.character(floor(as.numeric(as.POSIXct(Sys.time())))))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.