pkg_name <- "bulma.R"
pkg_vers <- function() {
unname(read.dcf(
system.file("DESCRIPTION", package = pkg_name),
c("Version")
)[1, 1])
}
pkg_inst <- function(...) {
path(path_package(pkg_name), ...)
}
pkg_temp <- function(...) {
temp_dir <- path(path_temp(), pkg_name)
dir_create(temp_dir)
path(temp_dir, ...)
}
pkg_user <- function(...) {
user_dir <- tools::R_user_dir(pkg_name)
dir_create(user_dir)
path(user_dir, ...)
}
globalVariables(
c("."),
package = pkg_name
)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.