R/rule_helper.R

Defines functions add_rule_to_condformat

add_rule_to_condformat <- function(x, rule) {
  condformatopts <- attr(x, "condformat")
  condformatopts[["rules"]] <- c(condformatopts[["rules"]], list(rule))
  attr(x, "condformat") <- condformatopts
  x
}
zeehio/condformat documentation built on Nov. 16, 2018, 5:05 a.m.