Аналіз "диванного експерта" відкритих даних по захворюваності на COVID19 в Україні
Це лише заготовка, сторінка роботі.
https://otexts.com/fpp2/holt-winters.html
Завантаження бібліотек
library(tidyverse)
library(fable)
library(tsibble)
Створення об’єктів типу “часовий ряд” на основі фреймів даних. Частота 7 рекомендована для щоденних вимирів та тижневій “природній” періодичності.
ts.new_confirm <- ts(daily_area_dyn$new_confirm, frequency=7)
ts.new_susp <- ts(daily_area_dyn$new_susp, frequency=7)
Корелограма нових підозр (просто перегляд)
acf(ts.new_susp)
ccf(ts.new_susp, ts.new_confirm, lag.max = 10)
Побудова моделі Холта-Вінтерса
hw.new_susp <- HoltWinters(ts.new_susp, seasonal="multiplicative") # additive
plot(hw.new_susp)
Прогноз із використанням моделі Холта-Вінтерса на 14 “періодів” спостережень. В даному випадку, це 14 днів або 2 тижні
fc.new_susp <- predict(hw.new_susp, 14)
plot(hw.new_susp, fc.new_susp)