.onLoad <- function(libname, pkgname = "verifieR") {
.verifier <<- new.env()
local(envir=.verifier, {
rule_set <- data.frame(name = character(), x = character(),
type = character(), y = character(),
def = character(), result = character(),
na.rm = character(), stringsAsFactors = F)
})
local(envir=.verifier, {
set_names <- c("name", "x", "type", "y", "def", "result", "na.rm")
})
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.