Displaying 1 result from an estimated 1 matches for "dfuture".
Did you mean:
future
2023 Oct 26
2
Plot for 10 years extrapolation
..."2004-12-31"))
?
value <-c(15348, 13136, 11733, 10737, 15674, 11098, 13721, 13209, 11099, 10087, 14987, 11098, 13421, 9023, 12098)
?
model <- lm(value~date)
?
plot(value~date ,col="grey",pch=20,cex=1.5,main="Plot")
abline(model,col="darkorange",lwd=2)
?
dfuture <- data.frame(date=seq(as.Date("2019-12-31"), by="1 year", length.out=10))
?
predict(model,dfuture,interval="prediction")
########################################################