R/contains-hts-call.R

Defines functions contains_hts_call

contains_hts_call <- function(formula) {
  formula_string <- rlang::expr_text(formula)
  stringr::str_detect(formula_string, "hts\\([a-zA-Z]+")
}
njtierney/yahtsee documentation built on Feb. 5, 2022, 8:25 p.m.