### - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
### Makes for nicer syntax than as(x, "DocCollection")
###
DocCollection <- function(x) as(x, "DocCollection")
DocList <- function(x) as(x, "DocList")
DocDataFrame <- function(x) as(x, "DocDataFrame")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.