r-我如何绘制第二个系数(不包括截距)?我可以选择用abline绘制哪个系数吗

Question

我正在通过以下操作运行时间序列回归：

ts(Regression.data, frequency = 12, start=c(2012,10))

然后运行：

attach(Regression.data)
model <- lm(logsalesUK ~ time(Date) + Exchangerate)
plot(Exchangerate, logsalesUK)

我想返回回归线使用：

abline(model)

然而，这将返回日期回归线。有人能向我解释一下如何选择汇率回归线到曲线图吗？

---奖励问题---

这个时间序列回归是否考虑了ts函数中指定的季节性？(见上文(

Answer 1

您可以从model中提取所需的系数，并将它们显式地输入到abline中：

abline(model$coefficients[["(Intercept)"]], model$coefficients[["Exchangerate"]])