#' Returns the package's install directory (for the loaded
#' version).
home <- function() system.file(package="pdhs")
#' Returns the package's scripts directory (for the loaded
#' version).
scripts <- function() system.file('scripts', package='pdhs')
#' Returns the package's static resource directory (for the
#' loaded version).
static <- function() system.file('static', package='pdhs')
#' Returns the package's examples directory (for the loaded
#' version).
examples <- function() system.file('examples', package='pdhs')
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.