Nothing
# overwrite unitizer_sect to just plain eval stuff
unitizer_sect <- function(
title = NULL, expr=expression(), details=character(), compare=identical
) {
expr.sub <- substitute(expr)
for(i in as.list(tail(expr.sub, -1L))) try(eval(i, envir=parent.frame()))
}
source('unitizer/_pre/lorem.R')
source('unitizer/alike.R', echo=TRUE)
source('unitizer/cstringr.R', echo=TRUE)
source('unitizer/language.R', echo=TRUE)
source('unitizer/validate.R', echo=TRUE)
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.