R/kokudosuuchiUtils-package.R

#' Utilities For 'kokudosuuchi' Package
#'
#' @name kokudosuuchiUtils
#' @docType package
#' @importFrom magrittr %>%
#' @importFrom rlang .data
NULL

HTML_DIR <- "downloaded_html"

# possibly empty e.g.: http://nlftp.mlit.go.jp/ksj/gml/datalist/KsjTmplt-L02-v2_3.html
# "&nbsp" is a typo of &nbsp;, which is not translated as no-break space.
ZOKUSEI_PATTERN <- "\u5c5e\u6027\u60c5\u5831|\u5730\u7269\u60c5\u5831|^(\\s|&nbsp)*$"

COLNAME_FRILL_PATTERN <- "(?<=^\u5c5e\u6027(\u60c5\u5831|\u540d|\u9805\u76ee))(\\s*[\uff08\\(].*[\uff09\\)])$"
yutannihilation/kokudosuuchiUtils documentation built on May 6, 2019, 5:04 p.m.