### Get locations of example files.
get.expath <- function(file.name, path.root = "./ex_data/", pkg = "cubfits"){
file.name <- paste(path.root, file.name, sep = "")
file.path <- tools::file_path_as_absolute(
system.file(file.name, package = "cubfits"))
file.path
} # get.expath()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.