#' @export
#' @importFrom utils browseURL
csawUsersGuide <- function()
# Show the csaw user's guide
#
# written by Aaron Lun.
{
thing <- BiocStyle::Biocbook("csawBook")
target <- sub(".*\\((.*)\\).*", "\\1", thing)
browseURL(target)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.