.onLoad <- function(libname, pkgname){
## initialize print routines
.C("rDEA_initialize", PACKAGE = pkgname)
}
.onAttach <- function(libname, pkgname){
version <- .C( "rDEA_get_engine_version",
GLPK_version = character(1L), PACKAGE = pkgname )
packageStartupMessage( sprintf("Using the GLPK callable library version %s", version) )
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.