Home » date » 2011 » Jan » 02 »

Aantal niet-werkende werkzoekende multiplicatieve decompositie

*Unverified author*
R Software Module: /rwasp_decompose.wasp (opens new window with default values)
Title produced by software: Classical Decomposition
Date of computation: Sun, 02 Jan 2011 15:01:35 +0000
 
Cite this page as follows:
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL http://www.freestatistics.org/blog/date/2011/Jan/02/t1293980411poiaqj0yx85udr5.htm/, Retrieved Sun, 02 Jan 2011 16:00:15 +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/2011/Jan/02/t1293980411poiaqj0yx85udr5.htm/},
    year = {2011},
}
@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 = {2011},
    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:
KDGP2W92
 
Dataseries X:
» Textbox « » Textfile « » CSV «
180144 173666 165688 161570 156145 153730 182698 200765 176512 166618 158644 159585 163095 159044 155511 153745 150569 150605 179612 194690 189917 184128 175335 179566 181140 177876 175041 169292 166070 166972 206348 215706 202108 195411 193111 195198 198770 194163 190420 189733 186029 191531 232571 243477 227247 217859 208679 213188 216234 213586 209465 204045 200237 203666 241476 260307 243324 244460 233575 237217 235243 230354 227184 221678 217142 219452 256446 265845 248624 241114 229245 231805 219277 219313 212610 214771 211142 211457 240048 240636 230580 208795 197922 194596 194581 185686 178106 172608 167302 168053 202300 202388 182516 173476 166444 171297 169701 164182 161914 159612 151001 158114 186530 187069 174330 169362 166827 178037 186413 189226 191563 188906 186005 195309 223532 226899 214126 206903 204442 220375
 
Output produced by software:


Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'Gwilym Jenkins' @ www.wessa.org


Classical Decomposition by Moving Averages
tObservationsFitTrendSeasonalRandom
1180144NANA0.995423283750292NA
2173666NANA0.975768518449167NA
3165688NANA0.956598297157661NA
4161570NANA0.939101196326037NA
5156145NANA0.91468427828444NA
6153730NANA0.929138854866797NA
7182698185027.899413663168936.7083333331.09524982011950.987407848108062
8200765191428.316633415167617.0833333331.142057317944911.04877378399803
9176512177022.829630454166583.7916666671.062665388146980.997114329086704
10166618168915.768170918165833.7083333331.018585243425840.986396958698413
11158644161512.474802846165275.3333333330.9772327881324050.982239917960843
12159585163840.036166042164912.7916666670.9934950133959740.974029326008386
13163095163900.4253626211646540.9954232837502920.9950858860748
14159044160291.730661833164272.2916666670.9757685184491670.992215876285814
15155511157434.755541777164577.7083333330.9565982971576610.987780617214053
16153745155764.802512948165865.8333333330.9391011963260370.987032997953562
17150569153018.333262948167290.8750.914684278284440.983993203881403
18150605156856.176197401168818.8750.9291388548667970.960147082831256
19179612186634.174545687170403.2916666671.09524982011950.962374658538393
20194690196365.144904561171939.8333333331.142057317944910.991469235004127
21189917184413.091794598173538.251.062665388146981.02984553944539
22184128178252.205394263174999.7916666671.018585243425841.03296337676575
23175335172279.747816587176293.4583333330.9772327881324051.01773425038134
24179566176465.867543785177621.2916666670.9934950133959741.01756788720315
25181140178596.108156447179417.250.9954232837502921.01424382574633
26177876177011.158312265181406.9166666670.9757685184491671.0048858032227
27175041174857.12089486182790.5416666670.9565982971576611.00105159632161
28169292172577.335584691183768.6250.9391011963260370.98096311098117
29166070169197.764231227184979.4166666670.914684278284440.981514151528903
30166972173164.924661569186371.4166666670.9291388548667970.964236841417668
31206348205641.18555945187757.3333333331.09524982011951.00343712490583
32215706216043.601450019189170.5416666671.142057317944910.99843734575913
33202108202427.085510394190489.9583333331.062665388146980.998423701504228
34195411195550.49905495191982.4583333331.018585243425840.99928663411434
35193111189256.561556286193665.7916666670.9772327881324051.02036620771306
36195198194248.848744815195520.7083333330.9934950133959741.00488626450719
37198770196732.098246825197636.6250.9954232837502921.0103587659123
38194163195042.831991925199886.3750.9757685184491670.995489031906792
39190420193319.866612627202090.9583333330.9565982971576610.98499964507819
40189733191645.902763741204073.750.9391011963260370.990018556430612
41186029188111.910632352205657.750.914684278284440.988927279376675
42191531192383.77473332070560.9291388548667970.995567325079874
43232571228396.004551434208533.251.09524982011951.01827963434284
44243477239912.218709295210070.2083333331.142057317944911.01485869002372
45227247224937.61498296211673.0416666671.062665388146981.01026678004572
46217859217022.742837936213062.9166666671.018585243425841.00385331579137
47208679209373.346398353214251.250.9772327881324050.996683692502904
48213188213948.033452933215348.8750.9934950133959740.996447579158982
49216234215235.938716519216225.5416666670.9954232837502921.00463705684763
50213586212032.384893881217297.8333333330.9757685184491671.00732725383859
51209465209178.353182906218668.9583333330.9565982971576611.00137034646622
52204045207022.237072569220447.2083333330.9391011963260370.98561875712161
53200237203602.241332479222592.9166666670.914684278284440.983471491716129
54203666208713.815962892224631.4583333330.9291388548667970.975814653478477
55241476247991.621072693226424.7083333331.09524982011950.973726446706106
56260307260292.46947663227915.4166666671.142057317944911.00005582383309
57243324243724.830601807229352.3751.062665388146980.998355396941638
58244460235115.320783236230825.3751.018585243425841.03974508843419
59233575226976.444201146232264.4583333330.9772327881324051.02907154450356
60237217232106.845538406233626.5833333330.9934950133959741.02201638839966
61235243233832.975691154234908.0833333330.9954232837502921.00603004903256
62230354230049.706644915235762.5833333330.9757685184491671.00132272872469
63227184225962.069597849236214.1666666670.9565982971576611.00540767928142
64221678221905.464994892236295.5833333330.9391011963260370.998974946403878
65217142215843.30858138235975.750.914684278284441.00601682501605
66219452218877.085184496235569.8333333330.9291388548667971.00262665602943
67256446257032.223806641234679.0833333331.09524982011950.997719259484436
68265845266731.816906697233553.7916666671.142057317944910.996675248881136
69248624247055.356761433232486.51.062665388146981.00634935934655
70241114235895.641961804231591.4583333331.018585243425841.02212146860704
71229245225793.218884882231053.6666666670.9772327881324051.01528735509492
72231805228971.333880502230470.5416666670.9934950133959741.01237563703488
73219277228404.02005352229454.1666666670.9954232837502920.960040020086418
74219313222202.535562525227720.5416666670.9757685184491670.986995937939187
75212610216113.092963364225918.3333333330.9565982971576610.98379046398657
76214771210189.512374044223819.8750.9391011963260371.02179693731723
77211142202299.006795148221168.1250.914684278284441.04371248947261
78211457202842.742395464218312.6250.9291388548667971.04246766486592
79240048236281.803256294215733.251.09524982011951.01593942780105
80240636243604.394846768213303.1251.142057317944910.987814690910504
81230580223653.162472762210464.3333333331.062665388146981.03097133727354
82208795211122.036081719207269.8751.018585243425840.988977767906624
83197922199049.044863865203686.4166666670.9772327881324050.994337853443928
84194596198749.919298631200051.250.9934950133959740.979099768627378
85194581195769.81426323196669.9166666670.9954232837502920.993927489446196
86185686188814.542195685193503.4166666670.9757685184491670.983430607837172
87178106181664.792534845189907.0833333330.9565982971576610.980410114226387
88172608175079.25768857186432.7916666670.9391011963260370.985884920228726
89167302167981.386588488183649.5833333330.914684278284440.995955584113896
90168053168515.320261221181367.2083333330.9291388548667970.99725650901945
91202300196443.733924178179359.751.09524982011951.02981141703447
92202388202631.898922454177427.0833333331.142057317944910.998796344880784
93182516186876.52727522175856.4166666671.062665388146980.97666626548128
94173476177885.9815582174640.251.018585243425840.975208942719542
95166444169471.26221956173419.5416666670.9772327881324050.98213701733313
96171297171205.228656602172326.2083333330.9934950133959741.00053603119553
97169701170471.2144586561712550.9954232837502920.995481850345807
98164182165841.251482426169959.6250.9757685184491670.989994941140433
99161914161646.219403276168980.250.9565982971576611.00165658434644
100159612158208.265567356168467.750.9391011963260371.00887269971395
101151001153952.607029525168312.2916666670.914684278284440.980827820415154
102158114156661.250608474168609.0833333330.9291388548667971.00927318903611
103186530185739.30980724169586.251.09524982011951.00425698896793
104187069195664.207225673171326.0833333331.142057317944910.956071642598592
105174330184483.980431532173604.9583333331.062665388146980.944960096764064
106169362179333.051660693176060.9166666671.018585243425840.944399252851844
107166827174670.5885507861787400.9772327881324050.955094966955439
108178037180566.02146407181748.2916666670.9934950133959740.985993923753957
109186413183993.873864523184839.8333333330.9954232837502921.01314786239708
110189226183484.650605786188041.1666666670.9757685184491671.03129062499374
111191563183053.613829268191358.9166666670.9565982971576611.04648575896824
112188906182731.523786832194581.2916666670.9391011963260371.03378987973838
113186005180844.782153227197712.7916666670.914684278284441.02853396036829
114195309186797.946794316201044.1666666670.9291388548667971.04556288413092
115223532NANA1.0952498201195NA
116226899NANA1.14205731794491NA
117214126NANA1.06266538814698NA
118206903NANA1.01858524342584NA
119204442NANA0.977232788132405NA
120220375NANA0.993495013395974NA
 
Charts produced by software:
http://www.freestatistics.org/blog/date/2011/Jan/02/t1293980411poiaqj0yx85udr5/13wj51293980493.png (open in new window)
http://www.freestatistics.org/blog/date/2011/Jan/02/t1293980411poiaqj0yx85udr5/13wj51293980493.ps (open in new window)


http://www.freestatistics.org/blog/date/2011/Jan/02/t1293980411poiaqj0yx85udr5/281u91293980493.png (open in new window)
http://www.freestatistics.org/blog/date/2011/Jan/02/t1293980411poiaqj0yx85udr5/281u91293980493.ps (open in new window)


http://www.freestatistics.org/blog/date/2011/Jan/02/t1293980411poiaqj0yx85udr5/3ls8e1293980493.png (open in new window)
http://www.freestatistics.org/blog/date/2011/Jan/02/t1293980411poiaqj0yx85udr5/3ls8e1293980493.ps (open in new window)


http://www.freestatistics.org/blog/date/2011/Jan/02/t1293980411poiaqj0yx85udr5/4jb6a1293980493.png (open in new window)
http://www.freestatistics.org/blog/date/2011/Jan/02/t1293980411poiaqj0yx85udr5/4jb6a1293980493.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