Začněte nyníZačněte zdarma

Jednoduché exponenciální vyrovnávání

Funkce ses() vytváří předpovědi pomocí jednoduchého exponenciálního vyrovnávání (SES). Parametry jsou odhadovány metodou nejmenších čtverců. Stačí zadat časovou řadu a horizont předpovědi; výchozí hodnota je h = 10 let.

> args(ses)
function (y, h = 10, ...)

> fc <- ses(oildata, h = 5)
> summary(fc)

Budeš také pracovat s funkcemi summary() a fitted(), a poprvé použiješ autolayer() – funguje podobně jako autoplot(), ale místo vytvoření nového grafu přidá do stávajícího novou "vrstvu".

Tyto funkce aplikuješ na datovou sadu marathon, která obsahuje roční vítězné časy Bostonského maratonu z let 1897–2016. Data jsou dostupná v tvém pracovním prostředí.

Toto cvičení je součástí kurzu

Forecasting v R

Zobrazit kurz

Pokyny k cvičení

  • Pomocí funkce ses() předpověz vítězné časy na příštích 10 let.
  • Pomocí funkce summary() si prohlédni parametry modelu a další informace.
  • Pomocí funkce autoplot() vykresli předpovědi.
  • Do grafu přidej jednorokové předpovědi pro trénovací data (vyrovnané hodnoty) pomocí fitted() a autolayer().

Interaktivní cvičení na vyzkoušení si v praxi

Vyzkoušejte si toto cvičení dokončením tohoto ukázkového kódu.

# Use ses() to forecast the next 10 years of winning times
fc <- ___(___, h = ___)

# Use summary() to see the model parameters
___

# Use autoplot() to plot the forecasts
___

# Add the one-step forecasts for the training data to the plot
autoplot(___) + autolayer(fitted(___))
Upravit a spustit kód