###
.onLoad <- function(libname, pkgname)
{
.Call2("init_DNAlkups",
DNA_STRING_CODEC@enc_lkup, DNA_STRING_CODEC@dec_lkup,
PACKAGE=pkgname)
.Call2("init_RNAlkups",
RNA_STRING_CODEC@enc_lkup, RNA_STRING_CODEC@dec_lkup,
PACKAGE=pkgname)
}
.onUnload <- function(libpath)
{
library.dynam.unload("Biostrings", libpath)
}
.test <- function() BiocGenerics:::testPackage("Biostrings")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.