#' Load data with given file name
#'
#' @param fileName the name of the file stored in the extdata directory to load
#'
#' @return the file as an R object
loadData <- function(fileName) {
fp <- paste0(find.package("coproanalysis")[1], "/extdata/", fileName)
readRDS(fp)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.