Home » date » 2010 » Dec » 21 »

CD laag geschoolden

*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: Tue, 21 Dec 2010 19:07:58 +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/21/t1292958383jnhbq7zcyhdkyzb.htm/, Retrieved Tue, 21 Dec 2010 20:06:24 +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/21/t1292958383jnhbq7zcyhdkyzb.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 «
104708 101817 97898 95559 92822 90848 101141 105841 93647 90923 89130 90212 93196 91861 90593 89895 88819 87924 96906 101217 98709 98139 95529 98577 100772 100180 99200 96251 94514 93780 105192 107682 99687 99436 102049 102673 105813 105056 103916 103513 101893 102503 113149 116696 108500 107800 105941 108742 111680 111270 110698 108517 107127 107088 116321 125045 116779 122887 120162 123198 123610 122293 121289 119393 117494 116693 125062 127281 120195 119804 117113 119240 115823 116281 113816 114632 112987 111633 116721 114850 112797 105368 102524 101327 102612 98873 95993 93244 90403 88539 98106 96963 90781 89253 87794 89810 90864 89025 87621 87718 83433 84535 92223 91052 88456 88706 89137 94066 99258 100673 102269 100833 99314 101764 108242 108148 104761 103772 103737 111043 109906 109335 107247 105690 102755 102280 110590 109122 102803 101424 99138
 
Output produced by software:


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


Classical Decomposition by Moving Averages
tObservationsFitTrendSeasonalRandom
1104708NANA1.01641565115049NA
2101817NANA1.00687571885726NA
397898NANA0.99534447860185NA
495559NANA0.981915695728145NA
592822NANA0.96068717761354NA
690848NANA0.957639738432018NA
710114199551.187689409395732.51.039889146208541.01596979752317
8105841100079.064380045948381.055263337270351.0575738358032
99364794366.560932739394118.79166666671.002632516436780.992374831448481
109092393070.326057652193578.41666666670.9945704295166220.97692791947111
118913091478.226825350593175.6250.9817828088123960.97433021051191
129021293535.6579145409928871.0069833013720.96446640790641
139319694108.61226980892588.70833333331.016415651150490.990302563731452
149186192853.65926146792219.58333333331.006875718857260.989309422274121
159059391808.418126531192237.83333333330.995344478601850.986761365119525
168989591072.107994629692749.41666666670.9819156957281450.987074989032877
178881989648.16515293693316.70833333330.960687177613540.990750896557431
188792489952.89620542993931.8750.9576397384320180.97744490404405
199690698369.440332172294596.08333333331.039889146208540.985123018620108
20101217100522.6707054595258.3751.055263337270351.00690719108114
219870996216.250820145895963.6251.002632516436781.02590777710216
229813996062.656956591196587.08333333330.9945704295166221.02161446611192
239552995320.515662871897089.20833333330.9817828088123961.00218719271165
249857798251.864206516797570.51.0069833013721.00330920737341
2510077299771.106213019598159.751.016415651150491.01003190026623
2610018099453.519832801698774.3751.006875718857261.0073047205209
279920098623.209990025199084.50.995344478601851.0058484205699
289625197385.703178699699179.29166666670.9819156957281450.988348359752381
299451495593.1776084354995050.960687177613540.98871072564555
309378095713.53815031199947.33333333330.9576397384320180.979798697366359
31105192104330.041589525100328.0416666671.039889146208541.00826184287232
32107682106308.547675787100741.251.055263337270351.01291949099335
3399687101407.171792223101140.9166666671.002632516436780.983036980897688
3499436101088.1384560691016400.9945704295166220.98365645582852
35102049100387.333108684102250.0416666670.9817828088123961.01655255538581
36102673103639.68640287102920.9583333331.0069833013720.990672623235155
37105813105316.881758957103615.9583333331.016415651150491.00471071904862
38105056105040.379524656104323.0833333331.006875718857261.0001487092432
39103916104576.738570722105065.8750.995344478601850.99368178258614
40103513103868.596993975105781.5833333330.9819156957281450.996576472540634
41101893102113.601654693106292.250.960687177613540.99783964475723
42102503102187.142880456106707.2916666670.9576397384320181.00309096732369
43113149111480.925960857107204.6251.039889146208541.01496286494542
44116696113660.3035307151077081.055263337270351.02670850222096
45108500108534.468588023108249.51.002632516436780.999682418051409
46107800108150.168671721108740.5833333330.9945704295166220.996762199485936
47105941107178.447520091109167.1666666670.9817828088123960.98845432501848
48108742110341.495934601109576.2916666671.0069833013720.985504130417544
49111680111703.571853614109899.51.016415651150490.99978897851499
50111270111138.48036276110379.5416666671.006875718857261.00118338523985
51110698110555.275181444111072.3750.995344478601851.00129098153228
52108517110019.685130402112045.9583333330.9819156957281450.986341670323628
53107127108814.27463265113267.1250.960687177613540.98449399549511
54107088109613.3597404061144620.9576397384320180.976961204853256
55116321120171.06291215115561.4166666671.039889146208540.96796181361095
56125045122956.953685538116517.7916666671.055263337270351.01698192946291
57116779117727.480802168117418.3751.002632516436780.991943420553085
58122887117670.445465662118312.8333333330.9945704295166221.0443319009603
59120162117026.506337203119197.9583333330.9817828088123961.026793021179
60123198120868.331536594120030.1251.0069833013721.01927443221718
61123610122777.46272355120794.5416666671.016415651150491.00678086399557
62122293122085.610756571121251.9166666671.006875718857261.00169871979297
63121289120921.829398769121487.4166666670.995344478601851.00303642942764
64119393119304.025338743121501.2916666670.9819156957281451.00074578088211
65117494116479.277393769121245.7916666670.960687177613541.00871161488065
66116693115830.197315683120953.8333333330.9576397384320181.00744885793439
67125062125269.682724725120464.4583333331.039889146208540.9983421150257
68127281126514.993873674119889.51.055263337270351.00605466674639
69120195119641.756934175119327.6251.002632516436781.00462416366996
70119804118172.744973002118817.8750.9945704295166221.01380398692922
71117113116274.21525995118431.7083333330.9817828088123961.00721384993375
72119240118857.343926116118033.0833333331.0069833013721.00321945671377
73115823119403.132164339117474.7083333331.016415651150490.97001643005971
74116281117410.980466001116609.2083333331.006875718857260.990375853591239
75113816115243.9697659581157830.995344478601850.987609158476074
76114632112795.847194303114873.250.9819156957281451.01627854971056
77112987109195.427270368113663.8750.960687177613541.03472281600441
78111633107552.159908398112309.6250.9576397384320181.0379428929654
79116721115440.997144477111012.7916666671.039889146208541.0110879400489
80114850115801.4328420361097371.055263337270350.991783928586322
81112797108554.061698449108269.0416666671.002632516436781.0390859469942
82105368106056.266394112106635.250.9945704295166220.993510365605793
83102524102893.8655272104803.0833333330.9817828088123960.996405368528974
84101327103618.413880629102899.8333333331.0069833013720.97788603593886
85102612102822.597751034101161.9583333331.016415651150490.997951833977742
8698873100326.14545581199641.04166666671.006875718857260.985515785050755
879599397522.276051318397978.41666666670.995344478601850.98431870016535
889324494646.4856928596389.6250.9819156957281450.98518185136423
899040391365.593626082295104.41666666670.960687177613540.989464375068566
908853990028.469941453694010.79166666670.9576397384320180.98345556752856
919810696752.759339533393041.41666666671.039889146208541.01398658466905
929696397233.634729707492141.58333333331.055263337270350.997216655219568
939078191622.982380574691382.41666666661.002632516436780.990810358288958
948925390310.310234874490803.33333333330.9945704295166220.988292474778078
958779488637.970067073390282.66666666670.9817828088123960.990478458989589
968981090452.694622115489825.41666666671.0069833013720.99289468793826
979086490881.238473492489413.45833333331.016415651150490.999810318677629
988902589533.444625380288922.04166666671.006875718857260.994321176544613
998762188166.494152013688578.8750.995344478601850.993812908664906
1008771886859.48509418688459.20833333330.9819156957281451.00988395112961
1018343385013.48997906988492.3750.960687177613540.981408950750543
1028453584967.22421887388725.66666666670.9576397384320180.99491304767401
1039222392812.965994264589252.751.039889146208540.993643495949682
1049105295066.387650788490087.83333333331.055263337270350.957772796989672
1058845691423.542062513491183.51.002632516436780.967540723148921
1068870691838.923544606992340.29166666670.9945704295166220.965886756685631
1078913791844.268182569493548.45833333330.9817828088123960.97052327558223
1089406695590.952790278794928.04166666671.0069833013720.984047101260468
1099925897894.421765126596313.3751.016415651150491.013929069811
11010067398364.87741494297693.16666666661.006875718857261.02346490582529
11110226998623.583244204699084.8750.995344478601851.03696293154112
11210083398576.48052553991003920.9819156957281451.0228910533469
1139931497632.7965437737101628.0833333330.960687177613541.01721965892345
11410176498583.0657248668102943.7916666670.9576397384320181.03226653839322
115108242108247.087359721104094.8333333331.039889146208540.999953002340805
116108148110696.50850938104899.4166666671.055263337270350.976977516782621
117104761105745.395585425105467.751.002632516436780.990690889376547
118103772105302.672091581105877.5416666670.9945704295166220.98546407169754
119103737104288.201653798106223.2916666670.9817828088123960.994714630753456
120111043107131.107296915106388.1666666671.0069833013721.03651500298829
121109906NA106507.5NANA
122109335NA106645.916666667NANA
123107247NA106604.916666667NANA
124105690NA106425.5NANA
125102755NA106136.041666667NANA
126102280NANANANA
127110590NANANANA
128109122NANANANA
129102803NANANANA
130101424NANANANA
13199138NANANANA
 
Charts produced by software:
http://www.freestatistics.org/blog/date/2010/Dec/21/t1292958383jnhbq7zcyhdkyzb/1dq2v1292958474.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/21/t1292958383jnhbq7zcyhdkyzb/1dq2v1292958474.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/21/t1292958383jnhbq7zcyhdkyzb/2o0jy1292958474.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/21/t1292958383jnhbq7zcyhdkyzb/2o0jy1292958474.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/21/t1292958383jnhbq7zcyhdkyzb/3o0jy1292958474.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/21/t1292958383jnhbq7zcyhdkyzb/3o0jy1292958474.ps (open in new window)


http://www.freestatistics.org/blog/date/2010/Dec/21/t1292958383jnhbq7zcyhdkyzb/4yr111292958474.png (open in new window)
http://www.freestatistics.org/blog/date/2010/Dec/21/t1292958383jnhbq7zcyhdkyzb/4yr111292958474.ps (open in new window)


 
Parameters (Session):
par1 = multiplicative ; par2 = 12 ;
 
Parameters (R input):
par1 = multiplicative ; 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