用最小二乘法绘制校正回归图

Question

我有一个用最小二乘法拟合的回归模型。

library(TSA)
data(hours)
lmhr2 <- lm(hours ~ time(hours)+ I(time(hours)^2), data =hours) 
summary(lmhr2)

plot(hours)
abline(lmhr2)

当我在图中运行abline时，会得到以下错误：

In abline(lmhr2)：仅使用3个回归系数

中的前两个

Answer 1

您可以使用ggplot2::geom_smooth()绘制模型

library(TSA)
library(ggplot2)
data(hours)

data.frame(time = time(hours), hours = hours) |>  
  ggplot(aes(time, hours)) +
  geom_smooth(method = lm, formula = y ~ x + I(x^2))

​

​