#' create package manual
#'
#' This function calculates combinations for efficient correlation calculations
#'
#' @param pack name of package
#'
#' @import devtools
#' @export
hpack_manual <- function(pack="hammond") {
devtools::document()
path <- find.package(pack)
if (file.exists(file.path(getwd(), paste0(pack, '.pdf')))) {
file.remove(file.path(getwd(), paste0(pack, '.pdf')))
}
system(paste(shQuote(file.path(R.home("bin"), "R")),
"CMD", "Rd2pdf", shQuote(path)))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.