如何在ggplot中取lm回歸的斜率

Question

我使用ggplot在x和y變量之間有一個plot，特別是以下代碼：

ggplot(data = dataset, aes(x = X, y = log_Y, colour = Year)) +
  geom_point() +
  geom_smooth(method = "lm", se = FALSE)

有什么方法可以采用 lm 回歸創建的線的斜率？

提前致謝！

Answer 1

使用broom package，簡化了提取model數據的過程。 例如：

library(broom)
library(dplyr)

fit <- lm(mpg ~ cyl, data = mtcars)
summary(fit)

fit %>%
    tidy() %>%
    filter(term == "cyl") %>%
    pull(estimate)