unbound <-
function()
{
.Call("R_getUnboundValue", PACKAGE="RObjectTables")
}
.First.lib <-
function(libname, pkgname)
{
library.dynam("RObjectTables", pkgname, libname)
}
setMethod("cacheMetaData", "UserDefinedDatabase", function(where, attach = TRUE) {cat("In method\n"); character(0)})
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.