# holding place for things we want to keep around but not visible
.pkgenv <- new.env(parent=emptyenv())
.onAttach <- function(...) {
# read in the suffixes using V8
ct <- v8()
assign("ct", ct, envir=.pkgenv)
ct$source(system.file("extdata/suffixlist.js", package="zellingenach"))
if (interactive()) {
packageStartupMessage("Call display_maps() to see the visualization.")
}
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.