``` r model <- lm(Sepal.Length ~ Species * Sepal.Width, data = iris) modelbased::estimate_slopes(model, trend="Species", by="Sepal.Width") #> Error in Summary.factor(structure(c(1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, 1L, : 'range' not meaningful for factors ``` <sup>Created on 2025-01-09 with [reprex v2.1.1](https://reprex.tidyverse.org)</sup>