Terezia N.

Predvídanie predaja výrobku pomocou lineárneho vyrovnávania

Vypočítať obrat pre rok 2010 pomocou metódy malých štvorcov a dosiahnuté výsledky charakterizovať.

OBDOBIE TRŽBY
2006 131317
2007 124287
2008 121254
2009 114 766

1 odpoveď

Nikolas M. Kontaktovať

Použil som na to softvér R. Vytvoril som linearny model:
mnozstvo = beta_0 + rok * beta_1

Metódou najmenších štvorcov pre dané 4 roky som dostal odhady:
beta_0 = 10699620.5
beta_1 = -5268.6

Množstvo v roku 2010 teda bude:
Mnozstvo_2010 = 10699620.5- 2010 * 5268.6 = 109734.5

Kód v R:
predaj <- data.frame(rok = 2006:2009, mnozstvo = c(131317,124287,121254,114766))
predict(lm(mnozstvo ~ . ,data= predaj), newdata = data.frame(rok = 2010))
# 109734.5

Komentáre:

Dana K.

Nikolas, to nie je správne. Pri časových radoch sa musí časové obdobie precislovat. T.j. rok 2006 je časové obdobie x = 1, ďalší 2 atď. A až potom robiť lineárny regresiu.

Dana K.

A jednoduchšie je použiť excel, karta údaje, ikona data analysis. Volá sa to lineárny regresia. Alebo použiť funkciu LINEST,. Každopádne vždy na začiatku časové obdobia precislovat

Dana K.

Ešte lepšia je fcia TREND

Nikolas M.

Musím namietať. Regresia dá rovnaký výsledok aj keď roky prepíšem od x=1 pre 2006 až po x=5 pre 2010. Posun o konštantu nezmení výsledok, iba sa zmení interpretácia modelu. Gradient odhadnutej funkcie musí ostať rovnaký, jediné čo sa zmení je posun interceptu o 2005*beta_1 (môjho odhadu), kvôli lineárnej transformácii prediktora. predaj <- data.frame(rok = 1:4, mnozstvo = c(131317,124287,121254,114766)) predict(lm(mnozstvo ~ . ,data= predaj), newdata = data.frame(rok = 5)) #109734.5

Pošli svoju otázku Pošli svoju otázku