#' @importClassesFrom BiocIO BiocFile
setClass('LoomFile', contains='BiocFile')
#' @export
#' @importFrom S4Vectors isSingleString
LoomFile <- function(path)
{
if (!isSingleString(path))
stop('"filename" must be a single string, specifiying a path')
new('LoomFile', resource=path)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.