#' @import dplyr
#' @import rlang
#' @importFrom utils download.file untar unzip globalVariables
#' @keywords internal
"_PACKAGE"
utils::globalVariables(c("where", "IPAdic", "IPAdicMatrixDef"))
#' Package internal environment
#' @noRd
.pkgenv <- rlang::env()
#' onLoad
#' @noRd
#' @param libname libname
#' @param pkgname pkgname
#' @keywords internal
.onLoad <- function(libname, pkgname) {
rlang::env_bind(.pkgenv, "read_aozora" = memoise::memoise(read_aozora_impl()))
rlang::env_bind(.pkgenv, "read_ldnws" = memoise::memoise(read_ldnws_impl()))
rlang::env_bind(.pkgenv, "read_jrte_rte" = memoise::memoise(read_jrte_rte_impl()))
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.