[Day-27] 預測操作--SARIMA模型預測 (SARIMA model in r)

第 12 屆 iThome 鐵人賽

DAY 27

影片教學

R語言-預測方法大全系列第 27 篇

12th鐵人賽 r 時間序列機器學習數據分析

Denny Chang

2020-09-27 00:09:02

2255 瀏覽

分享至

您的訂閱是我製作影片的動力
訂閱點這裡~

若內容有誤，還請留言指正，謝謝您的指教

#影片程式碼
#延續DAY26
p<-forecast(fit,3,lambda = 1)
p
plot(p)
預測 <- as.data.frame(p)
評估 <- cbind(預測,對照組)
評估 <- 評估 %>% 
        mutate(mae=abs(加權股價-評估$`Point Forecast`)) %>% 
        mutate(mape=abs(加權股價-評估$`Point Forecast`)/加權股價)
mean(評估$mape)

檔案下載處:
https://drive.google.com/drive/u/1/folders/1QIRQIvqYF0C37gfGURHMoSElh_6BYUr6
資料來源:
https://www.twse.com.tw/zh/