#' @rdname IncludeTag-class
setClass("CollateTag", contains = "Tag",
list(files = "character"))
setMethod("value", "CollateTag", function(tag) {
tag@files
})
setMethod("value<-", "CollateTag", function(tag, value) {
tag@files <- value
tag
})
setMethod("writeDescription", "CollateTag", function(object) {
list(collate = object@files)
})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.