Nothing
.packageName <- 'epineticseq'
.First.lib <-
function (lib.loc, pkg){
library.dynam('epineticseq', pkg, lib.loc)
require(sna);
require(degreenet);
require(network);
}
.Last.lib <-
function (lib.loc, pkg){
library.dynam.unload('epineticseq', pkg, lib.loc)
pos <- match ("package::sna", search())
if (!is.na(pos)){
detach (pos = pos)
}
pos <- match ("package::degreenet", search())
if (!is.na(pos)){
detach (pos = pos)
}
pos <- match ("package::network", search())
if (!is.na(pos)){
detach (pos = pos)
}
}
Any scripts or data that you put into this service are public.
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.