stop_eventlog <- function(eventlog)
if(!("eventlog" %in% class(eventlog)))
stop("Function only applicable for class eventlog")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.