warningPlotEditing <- function(message, call = sys.call(-1L), ...) {
signalCondition(structure(
class = c("plotediting", "condition"),
list(message = message, call = call, ...)
))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.