Home » date » 2010 » Dec » 29 »

CD

*The author of this computation has been verified*
R Software Module: /rwasp_decompose.wasp (opens new window with default values)
Title produced by software: Classical Decomposition
Date of computation: Wed, 29 Dec 2010 07:36:00 +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/Dec/29/t129360802236pa7te3v1gwpz7.htm/, Retrieved Wed, 29 Dec 2010 08:33:43 +0100
 
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/Dec/29/t129360802236pa7te3v1gwpz7.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:
 
Dataseries X:
» Textbox « » Textfile « » CSV «
11974 10106 12069 11412 11180 10508 11288 10928 10199 11030 11234 13747 13912 12376 12264 11675 11271 10672 10933 10379 10187 10747 10970 12175 14200 11676 11258 10872 11148 10690 10684 11658 10178 10981 10773 11665 11359 10716 12928 12317 11641 10459 10953 10703 10703 11101 11334 13268 13145 12334 13153 11289 11374 10914 11299 11284 10694 11077 11104 12820 14915 11773 11608 11468 11511 11200 11164 10960 10667 11556 11372 12333 13102 11115 12572 11557 12059 11420 11185 11113 10706 11523 11391 12634 13469 11735 13281 11968 11623 11084 11509 11134 10438 11530 11491 13093 13106 11305 13113 12203 11309 11088 11234 11619 10942 11445 11291 13281 13726 11300 11983 11092 11093 10692 10786 11166 10553 11103 10969 12090 12544 12264 13783 11214 11453 10883 10381 10348 10024 10805 10796 11907 12261 11377 12689 11474 10992 10764 12164 10409 10398 10349 10865 11630 12221 10884 12 etc...
 
Output produced by software:


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


Classical Decomposition by Moving Averages
tObservationsFitTrendSeasonalRandom
111974NANA1733.43353174603NA
210106NANA76.8978174603179NA
312069NANA960.644841269841NA
411412NANA-28.3789682539683NA
511180NANA-182.066468253969NA
610508NANA-695.075396825397NA
71128810962.749007936511387-424.250992063492325.250992063493
81092810959.576388888911562.3333333333-602.756944444444-31.5763888888905
91019910569.612103174611665.0416666667-1095.42956349206-370.612103174602
101103011274.281746031711684.125-409.843253968254-244.281746031744
111123411326.936507936511698.875-371.938492063492-92.9365079365052
121374712748.263888888911709.51038.76388888889998.736111111113
131391213434.975198412711701.54166666671733.43353174603477.024801587304
141237611740.772817460311663.87576.8978174603179635.227182539684
151226412601.144841269811640.5960.644841269841-337.144841269841
161167511599.829365079411628.2083333333-28.378968253968375.1706349206343
171127111423.350198412711605.4166666667-182.066468253969-152.3501984127
181067210833.841269841311528.9166666667-695.075396825397-161.841269841269
191093311051.165674603211475.4166666667-424.250992063492-118.165674603173
201037910855.493055555611458.25-602.756944444444-476.493055555555
211018710291.737103174611387.1666666667-1095.42956349206-104.737103174602
221074710901.948412698411311.7916666667-409.843253968254-154.948412698413
231097010901.269841269811273.2083333333-371.93849206349268.730158730159
241217512307.597222222211268.83333333331038.76388888889-132.597222222221
251420012992.641865079411259.20833333331733.433531746031207.35813492064
261167611379.022817460311302.12576.8978174603179296.977182539682
271125812315.686507936511355.0416666667960.644841269841-1057.68650793651
281087211336.037698412711364.4166666667-28.3789682539683-464.037698412698
291114811183.891865079411365.9583333333-182.066468253969-35.8918650793657
301069010641.424603174611336.5-695.07539682539748.5753968253994
311068410772.624007936511196.875-424.250992063492-88.6240079365052
321165810435.743055555611038.5-602.7569444444441222.25694444445
33101789972.6537698412711068.0833333333-1095.42956349206205.34623015873
341098110788.031746031711197.875-409.843253968254192.968253968254
351077310906.686507936511278.625-371.938492063492-133.686507936507
361166512328.305555555611289.54166666671038.76388888889-663.305555555555
371135913024.55853174611291.1251733.43353174603-1665.55853174603
381071611339.43948412711262.541666666776.8978174603179-623.439484126982
391292812205.269841269811244.625960.644841269841722.730158730159
401231711243.12103174611271.5-28.37896825396831073.87896825397
411164111117.80853174611299.875-182.066468253969523.191468253968
421045910694.966269841311390.0416666667-695.075396825397-235.966269841269
431095311106.999007936511531.25-424.250992063492-153.999007936507
441070311070.326388888911673.0833333333-602.756944444444-367.326388888891
451070310654.445436507911749.875-1095.4295634920648.5545634920636
461110111306.573412698411716.4166666667-409.843253968254-205.573412698413
471133411290.519841269811662.4583333333-371.93849206349243.4801587301608
481326812709.055555555611670.29166666671038.76388888889558.944444444447
491314513437.100198412711703.66666666671733.43353174603-292.100198412696
501233411819.18948412711742.291666666776.8978174603179514.810515873016
511315312726.769841269811766.125960.644841269841426.230158730159
521128911736.37103174611764.75-28.3789682539683-447.37103174603
531137411572.100198412711754.1666666667-182.066468253969-198.100198412696
541091411030.841269841311725.9166666667-695.075396825397-116.841269841269
551129911356.749007936511781-424.250992063492-57.7490079365089
561128411228.618055555611831.375-602.75694444444455.3819444444453
571069410648.195436507911743.625-1095.4295634920645.8045634920636
581107711276.865079365111686.7083333333-409.843253968254-199.86507936508
591110411327.936507936511699.875-371.938492063492-223.936507936507
601282012756.263888888911717.51038.7638888888963.7361111111113
611491513457.225198412711723.79166666671733.433531746031457.7748015873
621177311781.56448412711704.666666666776.8978174603179-8.5644841269841
631160812650.686507936511690.0416666667960.644841269841-1042.68650793651
641146811680.49603174611708.875-28.3789682539683-212.496031746032
651151111557.93353174611740-182.066468253969-46.93353174603
661120011035.799603174611730.875-695.075396825397164.200396825399
671116411210.790674603211635.0416666667-424.250992063492-46.7906746031749
681096010929.326388888911532.0833333333-602.75694444444430.6736111111113
691066710449.403769841311544.8333333333-1095.42956349206217.596230158731
701155611178.865079365111588.7083333333-409.843253968254377.134920634919
711137211243.311507936511615.25-371.938492063492128.688492063491
721233312686.013888888911647.251038.76388888889-353.013888888889
731310213390.725198412711657.29166666671733.43353174603-288.725198412698
741111511741.43948412711664.541666666776.8978174603179-626.43948412698
751257212633.186507936511672.5416666667960.644841269841-61.186507936507
761155711644.412698412711672.7916666667-28.3789682539683-87.4126984126979
771205911490.141865079411672.2083333333-182.066468253969568.858134920634
781142010990.466269841311685.5416666667-695.075396825397429.533730158731
791118511289.124007936511713.375-424.250992063492-104.124007936505
801111311151.743055555611754.5-602.756944444444-38.7430555555547
811070610714.445436507911809.875-1095.42956349206-8.4454365079364
821152311446.698412698411856.5416666667-409.84325396825476.3015873015884
831139111483.561507936511855.5-371.938492063492-92.561507936507
841263412862.097222222211823.33333333331038.76388888889-228.097222222224
851346913556.266865079411822.83333333331733.43353174603-87.2668650793657
861173511914.106150793711837.208333333376.8978174603179-179.10615079365
871328112787.561507936511826.9166666667960.644841269841493.438492063491
881196811787.662698412711816.0416666667-28.3789682539683180.337301587302
891162311638.43353174611820.5-182.066468253969-15.43353174603
901108411148.716269841311843.7916666667-695.075396825397-64.7162698412649
911150911423.540674603211847.7916666667-424.25099206349285.4593253968269
921113411211.993055555611814.75-602.756944444444-77.9930555555566
931043810694.403769841311789.8333333333-1095.42956349206-256.403769841269
941153011382.781746031711792.625-409.843253968254147.218253968256
951149111417.394841269811789.3333333333-371.93849206349273.6051587301608
961309312815.180555555611776.41666666671038.76388888889277.819444444443
971310613498.55853174611765.1251733.43353174603-392.558531746032
981130511850.772817460311773.87576.8978174603179-545.77281746032
991311312775.728174603211815.0833333333960.644841269841337.271825396825
1001220311804.162698412711832.5416666667-28.3789682539683398.8373015873
1011130911638.600198412711820.6666666667-182.066468253969-329.6001984127
1021108811125.091269841311820.1666666667-695.075396825397-37.0912698412685
1031123411429.582341269811853.8333333333-424.250992063492-195.582341269841
1041161911276.701388888911879.4583333333-602.756944444444342.298611111113
1051094210736.737103174611832.1666666667-1095.42956349206205.262896825399
1061144511328.948412698411738.7916666667-409.843253968254116.051587301588
1071129111311.561507936511683.5-371.938492063492-20.561507936507
1081328112696.7638888889116581038.76388888889584.236111111111
1091372613356.266865079411622.83333333331733.43353174603369.733134920634
1101130011662.18948412711585.291666666776.8978174603179-362.189484126984
1111198312510.853174603211550.2083333333960.644841269841-527.853174603173
1121109211491.37103174611519.75-28.3789682539683-399.371031746032
1131109311310.016865079411492.0833333333-182.066468253969-217.016865079366
1141069210733.966269841311429.0416666667-695.075396825397-41.9662698412685
1151078610905.915674603211330.1666666667-424.250992063492-119.915674603173
1161116610718.326388888911321.0833333333-602.756944444444447.673611111109
1171055310340.820436507911436.25-1095.42956349206212.179563492064
1181110311106.490079365111516.3333333333-409.843253968254-3.49007936507769
1191096911164.478174603211536.4166666667-371.938492063492-195.478174603175
1201209012598.138888888911559.3751038.76388888889-508.138888888889
1211254413283.891865079411550.45833333331733.43353174603-739.891865079364
1221226411576.397817460311499.576.8978174603179687.602182539682
1231378312404.019841269811443.375960.6448412698411378.98015873016
1241121411380.537698412711408.9166666667-28.3789682539683-166.537698412698
1251145311207.225198412711389.2916666667-182.066468253969245.774801587302
1261088310679.382936507911374.4583333333-695.075396825397203.617063492064
1271038110930.790674603211355.0416666667-424.250992063492-549.790674603173
1281034810703.534722222211306.2916666667-602.756944444444-355.534722222223
1291002410128.320436507911223.75-1095.42956349206-104.320436507935
1301080510779.156746031711189-409.84325396825425.8432539682562
1311079610808.686507936511180.625-371.938492063492-12.686507936507
1321190712195.222222222211156.45833333331038.76388888889-288.222222222224
1331226112959.225198412711225.79166666671733.43353174603-698.225198412698
1341137711379.522817460311302.62576.8978174603179-2.52281746031804
1351268912281.394841269811320.75960.644841269841407.605158730161
1361147411288.954365079411317.3333333333-28.3789682539683185.045634920636
1371099211119.141865079411301.2083333333-182.066468253969-127.141865079366
1381076410597.466269841311292.5416666667-695.075396825397166.53373015873
1391216410855.082341269811279.3333333333-424.2509920634921308.91765873016
1401040910654.368055555611257.125-602.756944444444-245.368055555555
1411039810113.237103174611208.6666666667-1095.42956349206284.762896825396
1421034910752.031746031711161.875-409.843253968254-403.031746031747
1431086510763.019841269811134.9583333333-371.938492063492101.980158730159
1441163012151.472222222211112.70833333331038.76388888889-521.472222222221
1451222112761.93353174611028.51733.43353174603-540.933531746032
1461088411037.106150793710960.208333333376.8978174603179-153.106150793652
1471201911902.061507936510941.4166666667960.644841269841116.938492063495
1481102110921.704365079410950.0833333333-28.378968253968399.295634920636
1491079910814.516865079410996.5833333333-182.066468253969-15.5168650793657
1501042310354.466269841311049.5416666667-695.07539682539768.5337301587297
1511048410687.082341269811111.3333333333-424.250992063492-203.082341269841
1521045010555.409722222211158.1666666667-602.756944444444-105.409722222223
153990610085.903769841311181.3333333333-1095.42956349206-179.903769841269
1541104910788.365079365111198.2083333333-409.843253968254260.634920634922
1551128110862.686507936511234.625-371.938492063492418.313492063493
1561248512296.305555555611257.54166666671038.76388888889188.694444444445
1571284913007.266865079411273.83333333331733.43353174603-158.266865079366
1581138011365.481150793711288.583333333376.897817460317914.5188492063498
1591207912258.186507936511297.5416666667960.644841269841-179.186507936507
1601136611276.412698412711304.7916666667-28.378968253968389.5873015873021
1611132811104.725198412711286.7916666667-182.066468253969223.274801587302
1621044410571.174603174611266.25-695.075396825397-127.174603174604
1631085410900.499007936511324.75-424.250992063492-46.499007936507
1641043410798.534722222211401.2916666667-602.756944444444-364.534722222223
1651013710296.778769841311392.2083333333-1095.42956349206-159.778769841269
1661099210941.656746031711351.5-409.84325396825450.3432539682544
1671090610933.644841269811305.5833333333-371.938492063492-27.644841269841
1681236712309.013888888911270.251038.7638888888957.9861111111131
1691437112984.05853174611250.6251733.433531746031386.94146825397
1701169511307.68948412711230.791666666776.8978174603179387.310515873016
1711154612188.144841269811227.5960.644841269841-642.144841269841
1721092211211.62103174611240-28.3789682539683-289.621031746034
1731067011057.80853174611239.875-182.066468253969-387.808531746034
1741025410514.091269841311209.1666666667-695.075396825397-260.09126984127
17510573NANA-424.250992063492NA
17610239NANA-602.756944444444NA
17710253NANA-1095.42956349206NA
17811176NANA-409.843253968254NA
17910719NANA-371.938492063492NA
18011817NANA1038.76388888889NA
 
Charts produced by software:
http://www.freestatistics.org/blog/date/2010/Dec/29/t129360802236pa7te3v1gwpz7/14idu1293608155.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/29/t129360802236pa7te3v1gwpz7/14idu1293608155.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/29/t129360802236pa7te3v1gwpz7/24idu1293608155.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/29/t129360802236pa7te3v1gwpz7/24idu1293608155.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/29/t129360802236pa7te3v1gwpz7/3x9cf1293608155.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/29/t129360802236pa7te3v1gwpz7/3x9cf1293608155.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/29/t129360802236pa7te3v1gwpz7/4x9cf1293608155.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/29/t129360802236pa7te3v1gwpz7/4x9cf1293608155.ps (open in new window)


 
Parameters (Session):
par1 = additive ; par2 = 12 ;
 
Parameters (R input):
par1 = additive ; par2 = 12 ;
 
R code (references can be found in the software module):
par2 <- as.numeric(par2)
x <- ts(x,freq=par2)
m <- decompose(x,type=par1)
m$figure
bitmap(file='test1.png')
plot(m)
dev.off()
mylagmax <- length(x)/2
bitmap(file='test2.png')
op <- par(mfrow = c(2,2))
acf(as.numeric(x),lag.max = mylagmax,main='Observed')
acf(as.numeric(m$trend),na.action=na.pass,lag.max = mylagmax,main='Trend')
acf(as.numeric(m$seasonal),na.action=na.pass,lag.max = mylagmax,main='Seasonal')
acf(as.numeric(m$random),na.action=na.pass,lag.max = mylagmax,main='Random')
par(op)
dev.off()
bitmap(file='test3.png')
op <- par(mfrow = c(2,2))
spectrum(as.numeric(x),main='Observed')
spectrum(as.numeric(m$trend[!is.na(m$trend)]),main='Trend')
spectrum(as.numeric(m$seasonal[!is.na(m$seasonal)]),main='Seasonal')
spectrum(as.numeric(m$random[!is.na(m$random)]),main='Random')
par(op)
dev.off()
bitmap(file='test4.png')
op <- par(mfrow = c(2,2))
cpgram(as.numeric(x),main='Observed')
cpgram(as.numeric(m$trend[!is.na(m$trend)]),main='Trend')
cpgram(as.numeric(m$seasonal[!is.na(m$seasonal)]),main='Seasonal')
cpgram(as.numeric(m$random[!is.na(m$random)]),main='Random')
par(op)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Classical Decomposition by Moving Averages',6,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'t',header=TRUE)
a<-table.element(a,'Observations',header=TRUE)
a<-table.element(a,'Fit',header=TRUE)
a<-table.element(a,'Trend',header=TRUE)
a<-table.element(a,'Seasonal',header=TRUE)
a<-table.element(a,'Random',header=TRUE)
a<-table.row.end(a)
for (i in 1:length(m$trend)) {
a<-table.row.start(a)
a<-table.element(a,i,header=TRUE)
a<-table.element(a,x[i])
if (par1 == 'additive') a<-table.element(a,m$trend[i]+m$seasonal[i]) else a<-table.element(a,m$trend[i]*m$seasonal[i])
a<-table.element(a,m$trend[i])
a<-table.element(a,m$seasonal[i])
a<-table.element(a,m$random[i])
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.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