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

但基本方程在哪里？

在“系数”中：

> coef(model)
(Intercept)           x
  1.2093273   0.9786051

其中“（截距）”是 y 截距，“x”是斜率。换句话说，您可以像这样检索方程：

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