r - 如何在R中获得趋势线方程

Question

我有一系列时间和温度值形式的数据。我想生成一条趋势线并找到后续方程。这可以在excel中完成。但是，我怎么能在 R 中找到趋势线的方程。

abline 函数可用于生成趋势线，但潜在方程在哪里？我看到一个链接，他们使用以下代码来说明问题

x <- sample(1:100, 100, replace = TRUE)

y <- x + rnorm(100, sd = 4)
mydf <- data.frame(x = x, y = y)
plot(y ~ x, data = mydf)
model <- lm(y ~ x, data = mydf)
abline(model, col = "red")
summary(model)

如果您执行它，可以对结果有所了解并查看等式，请告诉我。否则帮我得到 R 的趋势线方程

谢谢!

Answer 1

but where is the underlying equation?

在“系数”中:

> coef(model)
(Intercept)           x
  1.2093273   0.9786051

其中“(截距)”是 y 轴截距，“x”是斜率。换句话说，您可以像这样检索方程:

paste('y =', coef(model)[[2]], '* x', '+', coef(model)[[1]])