我想根据我创建的回归模型绘制并生成新数据:
Trend <- seq(1:length(Daten$TSLAC))
TISPYNVDA_TSLA <- lm(TSLAC ~ Trend + SPYC * NVDAC, data = Daten)
summary(TISPYNVDA_TSLA)
plot(predict(TISPYNVDA_TSLA), type = "l",
xlab="geschätzte Werte der abh. Variablen",
ylab="geschätzte Residuen", main="Residuenplot", pch=20)
lines(Daten$TSLAC, col="red")
如上所示,我创建了一个用于创建未来数据的趋势序列:
newline <- data.frame(wt=predict(TISPYNVDA_TSLA))
功能:
TISPYNVDA_TSLA <- lm(TSLAC ~ Trend + SPYC * NVDAC, data = Daten)
创建回归。之后,我将回归与TSLAC(特斯拉收盘价)的实际数据一起绘制。
然后我想进一步预测“未来的预测”。
我该怎么做?
我尝试了predict()函数,但它不起作用:
lines(252:350,predict(newline,newdata=newline))
252因为数据将达到251,那么它应该在将来进行预测。