Nothing
setClass("Delay", representation(math = "expression"), contains = "SBase")
setMethod("describe", "Delay", function(object) as.character(math(object)))
setMethod("math", "Delay", function(object) object@math)
setReplaceMethod("math", "Delay", function(object, value) {
object@math <- value
object
})
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.