如何在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]])