rules_df = tidytable::tidytable(rule_nbr = 1:2,
LHS = c("var_1 > 50", "var_2 < 30"),
RHS = c(2, 1)
)
as_rulelist(rules_df, estimation_type = "regression")
Run the code above in your browser using DataLab