model <- mmir_model(mpg ~ -1 + hp + wt, data = mtcars, engine = "lm",
standardize = TRUE)
rm_res <- restriktor::restriktor(model, constraints = 'hp < wt')
rm_interpreter(rm_res) |> cat()
Run the code above in your browser using DataLab