Home » date » 2010 » May » 27 »

*Unverified author*
R Software Module: /rwasp_exponentialsmoothing.wasp (opens new window with default values)
Title produced by software: Exponential Smoothing
Date of computation: Thu, 27 May 2010 09:43:37 +0000
 
Cite this page as follows:
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL http://www.freestatistics.org/blog/date/2010/May/27/t12749535187p12pop36322es9.htm/, Retrieved Thu, 27 May 2010 11:45:19 +0200
 
BibTeX entries for LaTeX users:
@Manual{KEY,
    author = {{YOUR NAME}},
    publisher = {Office for Research Development and Education},
    title = {Statistical Computations at FreeStatistics.org, URL http://www.freestatistics.org/blog/date/2010/May/27/t12749535187p12pop36322es9.htm/},
    year = {2010},
}
@Manual{R,
    title = {R: A Language and Environment for Statistical Computing},
    author = {{R Development Core Team}},
    organization = {R Foundation for Statistical Computing},
    address = {Vienna, Austria},
    year = {2010},
    note = {{ISBN} 3-900051-07-0},
    url = {http://www.R-project.org},
}
 
Original text written by user:
 
IsPrivate?
No (this computation is public)
 
User-defined keywords:
KDGP2W62
 
Dataseries X:
» Textbox « » Textfile « » CSV «
93.2 96 95.2 77.1 70.9 64.8 70.1 77.3 79.5 100.6 100.7 107.1 95.9 82.8 83.3 80 80.4 67.5 75.7 71.1 89.3 101.1 105.2 114.1 96.3 84.4 91.2 81.9 80.5 70.4 74.8 75.9 86.3 98.7 100.9 113.8 89.8 84.4 87.2 85.6 72 69.2 77.5 78.1 94.3 97.7 100.2 116.4 97.1 93 96 80.5 76.1 69.9 73.6 92.6 94.2 93.5 108.5 109.4 105.1 92.5 97.1 81.4 79.1 72.1 78.7 87.1 91.4 109.9 116.3 113 100 84.8 94.3 87.1 90.3 72.4 84.9 92.7 92.2 114.9 112.5 118.3 106 91.2 96.6 96.3 88.2 70.2 86.5 88.2 102.8 119.1 119.2 125.1 106.1 102.1 105.2 101 84.3 87.5 92.7 94.4 113 113.9 122.9 132.7 106.9 96.6 127.3 98.2 100.2 89.4 95.3 104.2 106.4 116.2 135.9 134 104.6 107.1 123.5 98.8 98.6 90.6 89.1 105.2 114 122.1 138 142.2 116.4 112.6 123.8 103.6 113.9 98.6 95 116 113.9 127.5 131.4 145.9 131.5 131 130.5 118.9 114.3 85.7 104.6 105.1 117.3 142.5 140 159.8 131.2 125.4 126.5 119.4 113.5 98.7 114.5 etc...
 
Output produced by software:


Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time5 seconds
R Server'RServer@AstonUniversity' @ vre.aston.ac.uk


Estimated Parameters of Exponential Smoothing
ParameterValue
alpha0.0753244389726097
beta0.0743497117620023
gamma0.143887003920222


Interpolation Forecasts of Exponential Smoothing
tObservedFittedResiduals
1395.995.3817040598290.518295940170901
1482.882.47406954375440.325930456245615
1583.382.97877053026230.32122946973773
168079.40574974849780.594250251502189
1780.479.77745544687080.622544553129217
1867.566.58394553189790.916054468102146
1975.770.15100764587585.54899235412422
2071.178.3814528413874-7.28145284138742
2189.381.21300659731588.0869934026842
22101.1103.476636607267-2.37663660726733
23105.2103.0471228928372.15287710716323
24114.1109.2791824571074.82081754289277
2596.398.3706600558605-2.07066005586051
2684.485.3077252355168-0.907725235516764
2791.285.77727278420565.42272721579442
2881.982.71181116461-0.81181116460995
2980.583.0604627821201-2.56046278212007
3070.469.7275119937280.672488006272033
3174.873.95253657865630.847463421343718
3275.980.1553384195549-4.25533841955489
3386.385.3101050786980.989894921301953
3498.7105.657749775832-6.95774977583179
35100.9105.470929814007-4.57092981400731
36113.8111.4989501682582.30104983174151
3789.899.4170748093222-9.61707480932225
3884.485.8315249720352-1.43152497203523
3987.286.99203057752120.207969422478783
4085.682.56322185749483.03677814250524
417282.8496131916392-10.8496131916392
4269.269.15650774175720.0434922582428072
4377.573.18799197912734.31200802087265
4478.178.8227978561815-0.722797856181529
4594.384.81126739667479.4887326033253
4697.7104.658998448065-6.95899844806523
47100.2104.706981692591-4.50698169259113
48116.4111.5718193931284.82818060687229
4997.198.0264512961416-0.926451296141593
509386.16511057565536.83488942434474
519688.19322200507587.80677799492423
5280.584.7825249040725-4.28252490407246
5376.182.69840156445-6.59840156445006
5469.970.8270144560965-0.927014456096472
5573.675.4000651704758-1.80006517047585
5692.679.917126419473312.6828735805267
5794.288.3615976465595.83840235344103
5893.5105.813170849918-12.3131708499181
59108.5105.8212587428752.67874125712525
60109.4114.546798467673-5.14679846767326
61105.199.50596981362975.59403018637029
6292.589.22648071407133.27351928592867
6397.191.15376059230135.94623940769868
6481.486.0221506542785-4.62215065427846
6579.183.6301169552013-4.53011695520131
6672.172.7064729310604-0.606472931060438
6778.777.22668453390131.4733154660987
6887.183.97475561003073.12524438996927
6991.490.79263575484060.607364245159374
70109.9105.4098239708494.49017602915066
71116.3108.7470600111727.55293998882813
72113116.894654216458-3.89465421645802
73100103.480296227977-3.48029622797719
7484.892.2608272747916-7.46082727479161
7594.393.72731448794920.572685512050768
7687.186.74690303184940.353096968150638
7790.384.73180515978075.56819484021929
7872.475.1373341218339-2.73733412183394
7984.979.80830677611495.09169322388514
8092.787.10353509725035.59646490274974
8192.293.8412151353293-1.6412151353293
82114.9108.8616984884876.0383015115128
83112.5112.787777999-0.287777998999516
84118.3118.842509855483-0.542509855482663
85106105.7753772363590.224622763640582
8691.294.3657203529248-3.16572035292479
8796.697.308983382073-0.708983382073043
8896.390.28003724160296.01996275839707
8988.289.4946140803101-1.29461408031014
9070.278.3486897784115-8.14868977841145
9186.583.69391687607082.80608312392917
9288.290.9115610551227-2.71156105512271
93102.896.04137011987326.75862988012685
94119.1112.7442506417036.35574935829712
95119.2115.8822754007143.31772459928608
96125.1122.2246009587352.87539904126531
97106.1109.586030976262-3.48603097626165
98102.197.49405364596534.60594635403467
99105.2101.4413665963753.75863340362481
10010195.76102717622965.23897282377041
10184.394.056014736406-9.75601473640597
10287.581.42586084172626.07413915827377
10392.789.4446339046443.2553660953561
10494.496.1092203073772-1.70922030737715
105113102.72735723958410.2726427604161
106113.9119.813835355396-5.91383535539576
107122.9121.7272503336591.17274966634101
108132.7127.9409387050814.75906129491889
109106.9114.700205818255-7.80020581825451
11096.6103.43806453785-6.83806453784959
111127.3106.42471035798620.8752896420142
11298.2102.340570652769-4.1405706527692
113100.297.99139540040712.20860459959286
11489.488.49306980157950.906930198420554
11595.395.8430703452157-0.543070345215668
116104.2101.6352157945412.56478420545876
117106.4110.267604481654-3.86760448165367
118116.2124.154336949683-7.95433694968334
119135.9126.8644383404429.03556165955823
120134134.199102005128-0.199102005127827
121104.6118.937694375548-14.3376943755477
122107.1107.298311445254-0.198311445254063
123123.5114.4966855631899.00331443681051
12498.8106.147842883308-7.34784288330833
12598.6102.341746917011-3.741746917011
12690.692.1286193075609-1.52861930756092
12789.198.995193784973-9.89519378497306
128105.2104.3369680823230.863031917676679
129114111.816397246392.1836027536101
130122.1125.480133134192-3.38013313419226
131138130.6858210247367.31417897526424
132142.2136.5430728839035.65692711609688
133116.4119.755351746186-3.35535174618593
134112.6110.7996475320651.80035246793537
135123.8119.359240394494.44075960551035
136103.6108.452077391352-4.85207739135211
137113.9105.2885908040358.6114091959651
13898.696.34442423084632.25557576915372
13995102.448083754534-7.44808375453407
140116109.484464229776.51553577022977
141113.9117.675931447071-3.77593144707137
142127.5130.227710935714-2.72771093571427
143131.4136.986251838805-5.58625183880486
144145.9141.659888013294.24011198670973
145131.5123.5670359507857.932964049215
146131116.21145928502614.7885407149744
147130.5126.237302791044.26269720896038
148118.9114.215949011244.68405098876039
149114.3113.7510947332260.548905266773886
15085.7103.497863850553-17.7978638505527
151104.6106.831518042338-2.23151804233829
152105.1116.179459739376-11.0794597393761
153117.3121.638571898801-4.33857189880092
154142.5134.2465297352058.25347026479454
155140141.472489434589-1.47248943458877
156159.8147.80700975042911.9929902495708
157131.2130.8765186682190.323481331780613
158125.4123.9043226923791.49567730762111
159126.5131.498427706537-4.99842770653666
160119.4118.7536697501890.646330249810788
161113.5117.33001186107-3.83001186106954
16298.7104.176914087738-5.47691408773758
163114.5110.4497102403234.05028975967666
164113.8119.068787682872-5.2687876828715
165133.1125.8701643534337.22983564656671
166143.4141.0973610697212.30263893027924
167137.3146.62022279027-9.32022279026961
168165.2154.15040507990111.0495949200988
169126.9135.586178042608-8.68617804260757
170124128.03077542472-4.03077542471965
171135.7134.2531021945411.44689780545858
172130122.689490658397.31050934161026
173109.4121.154185771239-11.7541857712387
174117.8107.12265691468410.6773430853158
175120.3115.9078871565264.39211284347357
176121123.342775254675-2.34277525467476
177132.3132.0738207088860.226179291114477
178142.9146.12503217166-3.22503217166027
179147.4149.661279337455-2.26127933745497
180175.9160.44904678998315.450953210017
181132.6139.630872397595-7.03087239759503
182123.7132.869164387094-9.16916438709445
183153.3139.45407986616213.8459201338383
184134129.6948402014744.30515979852581
185119.6125.470069318725-5.87006931872467
186116.2114.9726442597171.22735574028304
187118.6122.263292068495-3.66329206849461
188130.7128.2037043469962.49629565300376
189129.3137.6765086935-8.37650869349994
190144.4150.607832195131-6.20783219513137
191163.2154.0182072668859.18179273311478
192179.4168.05917362187811.3408263781216
193128.1143.951872953372-15.8518729533724
194138.4136.2034767088822.19652329111824
195152.7146.7325332145175.96746678548283
196120135.092242387971-15.0922423879709
197140.5127.92571442932812.5742855706717
198116.2119.738342107991-3.53834210799118
199121.4125.969070213638-4.56907021363833
200127.8132.605456933839-4.80545693383912
201143.6139.985430904143.61456909586028
202157.6154.0794532156983.52054678430238
203166.2160.2956041809065.90439581909439
204182.3174.384024844317.91597515569026
205153.1146.3886784692766.71132153072435
206147.6142.8554065741614.74459342583881
207157.7154.2066316025853.49336839741531
208137.2139.69267301151-2.49267301151002
209151.5137.34142204609514.1585779539053
21098.7127.323715800007-28.6237158000067
211145.8131.58137404616414.2186259538363
212151.7139.76030912541311.9396908745866
213129.4149.774481634233-20.3744816342331
214174.1162.1672908627911.9327091372096
215197169.49962079814427.5003792018564
216193.9185.7686993917058.13130060829465
217164.1157.9168148579126.18318514208764
218142.8154.366653117081-11.5666531170812
219157.9164.515982510186-6.61598251018637
220159.2148.58070506737710.6192949326226
221162.2149.64256417568512.5574358243155
222123.1134.01318271328-10.9131827132803
223130145.605246702785-15.6052467027849
224150.1151.367729385919-1.26772938591907
225169.4156.14695609289613.2530439071045
226179.7175.6187560452134.08124395478711
227182.1184.63455096641-2.53455096640997
228194.3196.09963901259-1.79963901259026
229161.4167.220307170115-5.82030717011466
230169.4160.3169602962939.08303970370676
231168.8172.708608296053-3.90860829605307
232158.1159.313768770815-1.21376877081482
233158.5159.719280564451-1.21928056445054
234135.3139.82938794936-4.52938794935955
235149.3151.213735539886-1.91373553988581
236143.4159.927491603588-16.5274916035877
237142.2165.416175238885-23.216175238885
238188.4180.6433329259427.75666707405759
239166.2188.799015287482-22.5990152874823
240199.2198.4814317420.718568258000431
241182.7168.90183401046513.798165989535
242145.2165.213976921336-20.0139769213365
243182.1173.2772987974998.82270120250138
244158.7160.863196420228-2.16319642022816
245141.6160.854355892029-19.2543558920289
246132.6138.722468924335-6.1224689243347
247139.6149.88279955737-10.2827995573697
248147155.522919797583-8.52291979758326
249166.6160.2705522934666.32944770653421
250157181.555512957908-24.5555129579079
251180.4182.768948090535-2.36894809053496
252210.2196.72129148475913.4787085152413
253159.8169.55826220591-9.75826220591003
254157.8159.18063453672-1.38063453671992
255168.2172.171810091403-3.97181009140328
256158.4156.9482764410411.45172355895852
257152154.573982923802-2.57398292380242
258142.2135.1753467580637.02465324193656
259137.2146.575707815325-9.37570781532492
260152.6152.3266419518580.273358048141517
261166.8159.5705388307777.22946116922259
262165.6176.676726135823-11.0767261358235
263198.6181.79546546133516.8045345386649
264201.5199.34605692232.15394307770021
265170.7168.2204270202372.47957297976296
266164.4159.9298588194.47014118100006
267179.7173.1003725009136.59962749908675
268157159.537309349504-2.53730934950443
269168156.44717705442611.5528229455736
270139.3139.589084951856-0.289084951856069
271138.6148.414898343717-9.81489834371675
272153.4155.57249153035-2.17249153035036
273138.9163.699903926979-24.7999039269786
274172.1175.920752047979-3.8207520479788
275198.4185.29911866761113.1008813323886
276217.8200.60425616853717.1957438314633
277173.7170.7219706851162.97802931488428
278153.8162.803587209743-9.00358720974319
279175.6175.2368639308350.363136069165392
280147.1159.947794057183-12.8477940571833
281160.3157.8573750413452.44262495865499
282135.2138.588160114225-3.38816011422546
283148.8145.7464328148563.05356718514437
284151154.795510298768-3.79551029876791
285148.2159.686391591131-11.4863915911307
286182.2175.6721556444626.52784435553843
287189.2188.1102153811731.0897846188272
288183.1203.016961886855-19.9169618868553
289170168.2012103140671.798789685933
290158.4158.3469349135430.053065086456968
291176.1172.506423860823.59357613917956
292156.2155.5188720384260.681127961574077
293153.2156.373535341611-3.17353534161109
294117.9135.765706907933-17.8657069079327
295149.8142.4696507978947.3303492021061
296156.6150.7326846693965.86731533060401
297166.7155.18533728815611.5146627118439
298156.8175.286416123188-18.486416123188
299158.6184.962675665886-26.3626756658861
300210.8194.69882751908216.1011724809179
301203.6165.37925933245638.2207406675438
302175.2158.13403910419217.0659608958078
303168.7174.239212497778-5.53921249777815
304155.9156.318230836684-0.418230836683591
305147.3156.713060514289-9.4130605142886
306137133.7813573529573.21864264704291
307141.1145.644742463477-4.54474246347695
308167.4152.9711016367814.4288983632204
309160.2159.0204361430861.1795638569144
310191.9174.49395453977117.4060454602288
311174.4186.169409628363-11.7694096283628
312208.2203.0798251969525.1201748030476
313159.4176.239874269589-16.8398742695886
314161.1162.088040230811-0.988040230810782
315172.1173.780020381115-1.68002038111496
316158.4156.8069888415161.59301115848351
317114.6156.143744790002-41.5437447900019
318159.6132.27968752707227.3203124729278
319159.7144.86782491487614.8321750851243
320159.4156.2288936889653.171106311035
321160.7159.6551198289041.04488017109648
322165.5177.264339327424-11.7643393274238
323205182.68436023190822.3156397680923
324205.2204.4238079750440.776192024956288
325141.6174.325019142401-32.7250191424015
326148.1160.98687878748-12.8868787874801
327184.9171.52504668374713.3749533162529
328132.5156.04033683494-23.5403368349404
329137.3147.522729784611-10.222729784611
330135.5135.1336847570540.366315242946087
331121.7143.832538394001-22.1325383940011
332166.1150.45329697018615.6467030298135
333146.8154.201743585898-7.40174358589752
334162.8169.088565583847-6.2885655838474
335186.8179.104103441757.69589655824987
336185.5196.443411135034-10.9434111350338
337151.5160.505801568835-9.00580156883541
338158.1151.2278222012736.87217779872691
339143166.493176272817-23.493176272817
340151.2142.8581270729968.3418729270036
341147.6138.2307394522829.3692605477176
342130.7128.552850088262.14714991174031
343137.5134.2289122970033.27108770299665
344146.1147.768450139479-1.66845013947932
345133.6147.027886354299-13.4278863542992
346167.9161.4569628823396.44303711766145
347181.9174.2114822183527.68851778164824
348202188.98962013308213.0103798669176
349166.5155.16758614857911.3324138514212
350151.3149.7014917107261.59850828927424
351146.2160.667375611316-14.4673756113159
352148.3142.1361922250566.16380777494425
353144.7137.6576253003167.04237469968373
354123.6127.006729609647-3.40672960964676
355151.6132.54604202796319.0539579720366
356133.9146.83766025704-12.9376602570404
357137.4143.84100328795-6.44100328794966
358181.6161.63662687757719.9633731224228
359182175.8474478285196.15255217148146
360190191.481535580967-1.48153558096652
361161.2156.5270732763554.67292672364474
362155.5149.409395268566.09060473143956
363141.9158.746377594347-16.8463775943467
364164.6142.93790837672721.6620916232729
365136.2139.987386125708-3.78738612570817
366126.8127.313606439873-0.513606439873229
367152.5136.25851409449516.2414859055047
368126.6146.265392239242-19.6653922392418
369150.1143.7722214513396.3277785486612
370186.3166.26010294325320.0398970567466
371147.5178.856989558717-31.3569895587165
372200.4190.6577340077859.74226599221484
373177.2157.43814734888819.7618526511122
374127.4151.800763133638-24.4007631336375
375177.1155.77360861568121.3263913843187
376154.4148.1621143709196.23788562908089
377135.2140.775496221925-5.57549622192477
378126.4128.504332689485-2.10433268948498
379147.3139.6514881195957.64851188040515
380140.6144.278438217088-3.67843821708757
381152.3146.5820682026915.71793179730858
382151.2170.979211185298-19.779211185298
383172.2173.646267966007-1.44626796600662
384215.3193.24355376848222.0564462315179
385154.1162.42891005253-8.32891005252992
386159.3148.78679420546410.5132057945358
387160.4161.655960293943-1.25596029394313
388151.9150.3919891005351.50801089946489
389148.4141.1068841502917.29311584970915
390139.6130.3684890592999.23151094070087
391148.2143.8322128028594.36778719714061
392153.5146.8517318963446.64826810365594
393145.1151.387948948841-6.28794894884072
394183.7171.62571237350512.0742876264947
395210.5179.44700370862731.0529962913733
396203.3205.117005055233-1.81700505523315
397153.3168.825391120635-15.5253911206353
398144.3157.471841566143-13.1718415661434
399169.6167.1821431712112.4178568287889
400143.7156.774289693994-13.0742896939945
401160.1147.29046285239312.8095371476074
402135.6137.38636459677-1.78636459677031
403141.8149.472230858216-7.67223085821561
404159.9151.9199996664347.98000033356635
405145.7154.874580845336-9.17458084533581
406183.5177.3610179094956.13898209050507
407198.2187.25012433163810.9498756683622
408186.8206.909765079185-20.1097650791855
409172167.191138921434.80886107857046
410150.6157.571035301468-6.9710353014677
411163.3169.745969310568-6.44596931056776
412153.7156.482970675534-2.78297067553416
413152.9151.149507672931.75049232706954
414135.5138.339855399218-2.83985539921773
415148.5149.426790202806-0.926790202806416
416148.4154.366472456479-5.96647245647861
417133.6153.811348286886-20.2113482868856
418194.1177.26528964659816.834710353402
419208.6188.42142072232520.1785792776753
420197.3204.516735881192-7.21673588119171
421164.4169.029843902297-4.62984390229744
422148.1157.023794817004-8.9237948170044
423152169.002882294934-17.0028822949341
424144.1155.254309845245-11.1543098452449
425155149.6688319534885.33116804651152
426124.5136.313584612084-11.8135846120839
427153146.7242860722356.275713927765
428146151.321482552468-5.32148255246798
429138148.708803775667-10.7088037756675
430190177.64979551874412.350204481256
431192188.7302596841133.26974031588719
432192199.629545156666-7.62954515666601
433147164.175962359629-17.1759623596293
434133150.303537227622-17.3035372276222
435163160.1795412412482.82045875875193
436150148.4163428065431.58365719345682
437129145.769101648067-16.7691016480674
438131128.1296894641882.8703105358116
439145141.7970557114623.20294428853779
440137144.346445157159-7.34644515715863
441138140.579760749587-2.5797607495868
442168172.961867018186-4.96186701818618
443176181.19403625308-5.19403625307993
444188189.622127547596-1.62212754759554
445139153.001026292929-14.0010262929288
446143139.0186740075323.98132599246753
447150152.962520781902-2.96252078190236
448154140.35387992899213.6461200710079
449137135.9956907993271.00430920067254
450129122.2298545386226.77014546137795
451128136.178874201569-8.17887420156859
452140136.3472528365293.65274716347074
453143133.9847792182479.01522078175321
454151166.929771729927-15.929771729927
455177174.2499128852792.7500871147214
456184183.7411318692130.258868130786823
457151145.6147551193555.38524488064542
458134135.593800201548-1.59380020154805
459164148.27121765540715.7287823445926
460126139.462310625354-13.4623106253537
461131131.410461968137-0.410461968137071
462125118.3275187441186.67248125588215
463127130.302008191566-3.30200819156576
464143132.46100451368910.5389954863109
465143131.41835726167311.5816427383273
466160161.339788623503-1.33978862350315
467190172.42797959560817.572020404392
468182182.970941515961-0.970941515960732
469138145.693843747809-7.69384374780898
470136133.9457682411872.05423175881336
471152149.4097586357892.59024136421053
472127135.860816396765-8.86081639676465
473151130.0513332358920.9486667641101
474130119.79847784750310.2015221524967
475119131.010306751809-12.0103067518089
476153134.60472496724618.3952750327535


Extrapolation Forecasts of Exponential Smoothing
tForecast95% Lower Bound95% Upper Bound
477134.586409164776114.814870639324154.357947690229
478162.14525628071142.309083263991181.98142929743
479176.087040169628156.177234177619195.996846161637
480182.977351949697162.984400669025202.970303230368
481145.022424568521124.936323405228165.108525731814
482135.337450266373115.147725827717155.527174705029
483150.893114851834130.588850250796171.197379452872
484135.786101040228115.355962877219156.216239203236
485134.820379779293114.252646622768155.388112935817
486121.652573324972100.935165483224142.369981166721
487129.176479261339108.296989612719150.05596890996
488137.824013129657116.7697387586158.878287500714
 
Charts produced by software:
http://www.freestatistics.org/blog/date/2010/May/27/t12749535187p12pop36322es9/1ju9h1274953410.png (open in new window)
http://www.freestatistics.org/blog/date/2010/May/27/t12749535187p12pop36322es9/1ju9h1274953410.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/May/27/t12749535187p12pop36322es9/2ju9h1274953410.png (open in new window)
http://www.freestatistics.org/blog/date/2010/May/27/t12749535187p12pop36322es9/2ju9h1274953410.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/May/27/t12749535187p12pop36322es9/3611d1274953410.png (open in new window)
http://www.freestatistics.org/blog/date/2010/May/27/t12749535187p12pop36322es9/3611d1274953410.ps (open in new window)


 
Parameters (Session):
par1 = 12 ; par2 = Triple ; par3 = additive ;
 
Parameters (R input):
par1 = 12 ; par2 = Triple ; par3 = additive ;
 
R code (references can be found in the software module):
par1 <- as.numeric(par1)
if (par2 == 'Single') K <- 1
if (par2 == 'Double') K <- 2
if (par2 == 'Triple') K <- par1
nx <- length(x)
nxmK <- nx - K
x <- ts(x, frequency = par1)
if (par2 == 'Single') fit <- HoltWinters(x, gamma=F, beta=F)
if (par2 == 'Double') fit <- HoltWinters(x, gamma=F)
if (par2 == 'Triple') fit <- HoltWinters(x, seasonal=par3)
fit
myresid <- x - fit$fitted[,'xhat']
bitmap(file='test1.png')
op <- par(mfrow=c(2,1))
plot(fit,ylab='Observed (black) / Fitted (red)',main='Interpolation Fit of Exponential Smoothing')
plot(myresid,ylab='Residuals',main='Interpolation Prediction Errors')
par(op)
dev.off()
bitmap(file='test2.png')
p <- predict(fit, par1, prediction.interval=TRUE)
np <- length(p[,1])
plot(fit,p,ylab='Observed (black) / Fitted (red)',main='Extrapolation Fit of Exponential Smoothing')
dev.off()
bitmap(file='test3.png')
op <- par(mfrow = c(2,2))
acf(as.numeric(myresid),lag.max = nx/2,main='Residual ACF')
spectrum(myresid,main='Residals Periodogram')
cpgram(myresid,main='Residal Cumulative Periodogram')
qqnorm(myresid,main='Residual Normal QQ Plot')
qqline(myresid)
par(op)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Estimated Parameters of Exponential Smoothing',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Parameter',header=TRUE)
a<-table.element(a,'Value',header=TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'alpha',header=TRUE)
a<-table.element(a,fit$alpha)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'beta',header=TRUE)
a<-table.element(a,fit$beta)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'gamma',header=TRUE)
a<-table.element(a,fit$gamma)
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Interpolation Forecasts of Exponential Smoothing',4,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'t',header=TRUE)
a<-table.element(a,'Observed',header=TRUE)
a<-table.element(a,'Fitted',header=TRUE)
a<-table.element(a,'Residuals',header=TRUE)
a<-table.row.end(a)
for (i in 1:nxmK) {
a<-table.row.start(a)
a<-table.element(a,i+K,header=TRUE)
a<-table.element(a,x[i+K])
a<-table.element(a,fit$fitted[i,'xhat'])
a<-table.element(a,myresid[i])
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable1.tab')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Extrapolation Forecasts of Exponential Smoothing',4,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'t',header=TRUE)
a<-table.element(a,'Forecast',header=TRUE)
a<-table.element(a,'95% Lower Bound',header=TRUE)
a<-table.element(a,'95% Upper Bound',header=TRUE)
a<-table.row.end(a)
for (i in 1:np) {
a<-table.row.start(a)
a<-table.element(a,nx+i,header=TRUE)
a<-table.element(a,p[i,'fit'])
a<-table.element(a,p[i,'lwr'])
a<-table.element(a,p[i,'upr'])
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable2.tab')
 





Copyright

Creative Commons License

This work is licensed under a Creative Commons Attribution-Noncommercial-Share Alike 3.0 License.

Software written by Ed van Stee & Patrick Wessa


Disclaimer

Information provided on this web site is provided "AS IS" without warranty of any kind, either express or implied, including, without limitation, warranties of merchantability, fitness for a particular purpose, and noninfringement. We use reasonable efforts to include accurate and timely information and periodically update the information, and software without notice. However, we make no warranties or representations as to the accuracy or completeness of such information (or software), and we assume no liability or responsibility for errors or omissions in the content of this web site, or any software bugs in online applications. Your use of this web site is AT YOUR OWN RISK. Under no circumstances and under no legal theory shall we be liable to you or any other person for any direct, indirect, special, incidental, exemplary, or consequential damages arising from your access to, or use of, this web site.


Privacy Policy

We may request personal information to be submitted to our servers in order to be able to:

  • personalize online software applications according to your needs
  • enforce strict security rules with respect to the data that you upload (e.g. statistical data)
  • manage user sessions of online applications
  • alert you about important changes or upgrades in resources or applications

We NEVER allow other companies to directly offer registered users information about their products and services. Banner references and hyperlinks of third parties NEVER contain any personal data of the visitor.

We do NOT sell, nor transmit by any means, personal information, nor statistical data series uploaded by you to third parties.

We carefully protect your data from loss, misuse, alteration, and destruction. However, at any time, and under any circumstance you are solely responsible for managing your passwords, and keeping them secret.

We store a unique ANONYMOUS USER ID in the form of a small 'Cookie' on your computer. This allows us to track your progress when using this website which is necessary to create state-dependent features. The cookie is used for NO OTHER PURPOSE. At any time you may opt to disallow cookies from this website - this will not affect other features of this website.

We examine cookies that are used by third-parties (banner and online ads) very closely: abuse from third-parties automatically results in termination of the advertising contract without refund. We have very good reason to believe that the cookies that are produced by third parties (banner ads) do NOT cause any privacy or security risk.

FreeStatistics.org is safe. There is no need to download any software to use the applications and services contained in this website. Hence, your system's security is not compromised by their use, and your personal data - other than data you submit in the account application form, and the user-agent information that is transmitted by your browser - is never transmitted to our servers.

As a general rule, we do not log on-line behavior of individuals (other than normal logging of webserver 'hits'). However, in cases of abuse, hacking, unauthorized access, Denial of Service attacks, illegal copying, hotlinking, non-compliance with international webstandards (such as robots.txt), or any other harmful behavior, our system engineers are empowered to log, track, identify, publish, and ban misbehaving individuals - even if this leads to ban entire blocks of IP addresses, or disclosing user's identity.


FreeStatistics.org is powered by