Home » date » 2008 » May » 19 » attachments

US DOllar per euro-decompositie- Raf Deceulaer

R Software Module: rwasp_decompose.wasp (opens new window with default values)
Title produced by software: Classical Decomposition
Date of computation: Mon, 19 May 2008 13:10:23 -0600
 
Cite this page as follows:
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL http://www.freestatistics.org/blog/date/2008/May/19/t1211224270lwut01ooft88wva.htm/, Retrieved Mon, 19 May 2008 21:11:10 +0200
 
User-defined keywords:
 
Dataseries X:
» Textbox « » Textfile « » CSV «
1,0137 0,9834 0,9643 0,947 0,906 0,9492 0,9397 0,9041 0,8721 0,8552 0,8564 0,8973 0,9383 0,9217 0,9095 0,892 0,8742 0,8532 0,8607 0,9005 0,9111 0,9059 0,8883 0,8924 0,8833 0,87 0,8758 0,8858 0,917 0,9554 0,9922 0,9778 0,9808 0,9811 1,0014 1,0183 1,0622 1,0773 1,0807 1,0848 1,1582 1,1663 1,1372 1,1139 1,1222 1,1692 1,1702 1,2286 1,2613 1,2646 1,2262 1,1985 1,2007 1,2138 1,2266 1,2176 1,2218 1,249 1,2991 1,3408 1,3119 1,3014 1,3201 1,2938 1,2694 1,2165 1,2037 1,2292 1,2256 1,2015 1,1786 1,1856 1,2103 1,1938 1,202 1,2271 1,277 1,265 1,2684 1,2811 1,2727 1,2611 1,2881 1,3213 1,2999 1,3074 1,3242 1,3516 1,3511 1,3419 1,3716 1,3622 1,3896 1,4227 1,4684 1,457 1,4718
 
Text written by user:
 
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'Herman Ole Andreas Wold' @ 193.190.124.10:1001


Classical Decomposition by Moving Averages
tObservationsFitTrendSeasonalRandom
11.0137NANA0.0224529513888889NA
20.9834NANA0.0111355902777777NA
30.9643NANA0.00331892361111117NA
40.947NANA-0.00766510416666668NA
50.906NANA0.00560156250000001NA
60.9492NANA-0.00472413194444452NA
70.93970.9138119791666670.920891666666667-0.007079687499999990.0258880208333334
80.90410.90812656250.915179166666666-0.00705260416666664-0.00402656249999978
90.87210.90006406250.910325-0.0102609375000000-0.0279640624999998
100.85520.8950175347222220.90575-0.0107324652777778-0.0398175347222223
110.85640.8945473958333330.902133333333333-0.00758593749999995-0.0381473958333333
120.89730.9094001736111110.8968083333333330.0125918402777778-0.0121001736111112
130.93830.9119696180555560.8895166666666670.02245295138888890.0263303819444445
140.92170.8972105902777780.8860750.01113559027777770.0244894097222224
150.90950.8908689236111110.887550.003318923611111170.0186310763888887
160.8920.8836223958333330.8912875-0.007665104166666680.00837760416666655
170.87420.9003307291666670.8947291666666670.00560156250000001-0.0261307291666667
180.85320.8911300347222220.895854166666667-0.00472413194444452-0.0379300347222222
190.86070.8862786458333330.893358333333333-0.00707968749999999-0.0255786458333334
200.90050.8818598958333330.8889125-0.007052604166666640.0186401041666666
210.91110.8750932291666670.885354166666667-0.01026093750000000.0360067708333334
220.90590.8729592013888890.883691666666667-0.01073246527777780.032940798611111
230.88830.8776307291666670.885216666666667-0.007585937499999950.0106692708333332
240.89240.9038501736111110.8912583333333330.0125918402777778-0.0114501736111112
250.88330.9234487847222220.9009958333333330.0224529513888889-0.0401487847222223
260.870.9208314236111110.9096958333333330.0111355902777777-0.050831423611111
270.87580.9191397569444440.9158208333333330.00331892361111117-0.0433397569444445
280.88580.9141932291666670.921858333333333-0.00766510416666668-0.0283932291666665
290.9170.9353057291666670.9297041666666670.00560156250000001-0.0183057291666666
300.95540.9349383680555550.9396625-0.004724131944444520.0204616319444447
310.99220.94528281250.9523625-0.007079687499999990.0469171875000001
320.97780.96140156250.968454166666667-0.007052604166666640.0163984375000001
330.98080.9753682291666670.985629166666667-0.01026093750000000.00543177083333335
340.98110.9917258680555561.00245833333333-0.0107324652777778-0.0106258680555558
351.00141.01321406251.0208-0.00758593749999995-0.0118140624999998
361.01831.052229340277781.03963750.0125918402777778-0.0339293402777778
371.06221.076919618055561.054466666666670.0224529513888889-0.0147196180555556
381.07731.077314756944441.066179166666670.0111355902777777-1.47569444446383e-05
391.08071.081060590277781.077741666666670.00331892361111117-0.000360590277777684
401.08481.083805729166671.09147083333333-0.007665104166666680.000994270833333255
411.15821.111943229166671.106341666666670.005601562500000010.046256770833333
421.16631.117413368055561.1221375-0.004724131944444520.0488866319444443
431.13721.132116145833331.13919583333333-0.007079687499999990.0050838541666669
441.11391.148243229166671.15529583333333-0.00705260416666664-0.034343229166667
451.12221.15890156251.1691625-0.0102609375000000-0.0367015625
461.16921.169230034722221.1799625-0.0107324652777778-3.0034722221961e-05
471.17021.178884895833331.18647083333333-0.00758593749999995-0.00868489583333343
481.22861.202812673611111.190220833333330.01259184027777780.0257873263888886
491.26131.218377951388891.1959250.02245295138888890.0429220486111113
501.26461.215106423611111.203970833333330.01113559027777770.0494935763888891
511.22621.215760590277781.212441666666670.003318923611111170.0104394097222225
521.19851.21225156251.21991666666667-0.00766510416666668-0.0137515625000002
531.20071.23421406251.22861250.00560156250000001-0.0335140624999999
541.21381.233934201388891.23865833333333-0.00472413194444452-0.020134201388889
551.22661.238361979166671.24544166666667-0.00707968749999999-0.0117619791666665
561.21761.242030729166671.24908333333333-0.00705260416666664-0.0244307291666663
571.22181.244268229166671.25452916666667-0.0102609375000000-0.0224682291666667
581.2491.251680034722221.2624125-0.0107324652777778-0.00268003472222222
591.29911.261659895833331.26924583333333-0.007585937499999950.0374401041666668
601.34081.284812673611111.272220833333330.01259184027777780.055987326388889
611.31191.293832118055561.271379166666670.02245295138888890.0180678819444446
621.30141.282043923611111.270908333333330.01113559027777770.0193560763888889
631.32011.274868923611111.271550.003318923611111170.045231076388889
641.29381.26206406251.26972916666667-0.007665104166666680.0317359374999999
651.26941.268330729166671.262729166666670.005601562500000010.00106927083333352
661.21651.246517534722221.25124166666667-0.00472413194444452-0.0300175347222222
671.20371.233461979166671.24054166666667-0.00707968749999999-0.0297619791666666
681.22921.224772395833331.231825-0.007052604166666640.00442760416666688
691.22561.212159895833331.22242083333333-0.01026093750000000.0134401041666665
701.20151.203988368055561.21472083333333-0.0107324652777778-0.00248836805555541
711.17861.204672395833331.21225833333333-0.00758593749999995-0.0260723958333331
721.18561.227187673611111.214595833333330.0125918402777778-0.0415876736111109
731.21031.241765451388891.21931250.0224529513888889-0.0314654513888892
741.19381.235306423611111.224170833333330.0111355902777777-0.0415064236111111
751.2021.231614756944441.228295833333330.00331892361111117-0.0296147569444443
761.22711.22507656251.23274166666667-0.007665104166666680.00202343750000034
771.2771.24538906251.23978750.005601562500000010.0316109374999998
781.2651.245280034722221.25000416666667-0.004724131944444520.0197199652777775
791.26841.252311979166671.25939166666667-0.007079687499999990.0160880208333332
801.28111.260805729166671.26785833333333-0.007052604166666640.0202942708333333
811.27271.267422395833331.27768333333333-0.01026093750000000.00527760416666689
821.26111.277230034722221.2879625-0.0107324652777778-0.0161300347222220
831.28811.28865156251.2962375-0.00758593749999995-0.00055156249999988
841.32131.315121006944441.302529166666670.01259184027777780.00617899305555558
851.29991.332486284722221.310033333333330.0224529513888889-0.0325862847222222
861.30741.328848090277781.31771250.0111355902777777-0.0214480902777778
871.32421.329281423611111.32596250.00331892361111117-0.00508142361111097
881.35161.32990156251.33756666666667-0.007665104166666680.0216984375
891.35111.35741406251.35181250.00560156250000001-0.00631406249999977
901.34191.360255034722221.36497916666667-0.00472413194444452-0.0183550347222221
911.37161.370716145833331.37779583333333-0.007079687499999990.000883854166666698
921.3622NANA-0.00705260416666664NA
931.3896NANA-0.0102609375000000NA
941.4227NANA-0.0107324652777778NA
951.4684NANA-0.00758593749999995NA
961.457NANA0.0125918402777778NA
971.4718NANANANA
 
Charts produced by software:
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/19/t1211224270lwut01ooft88wva/15i1u1211224217.png (open in new window)
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/19/t1211224270lwut01ooft88wva/15i1u1211224217.ps (open in new window)


http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/19/t1211224270lwut01ooft88wva/2rkmd1211224217.png (open in new window)
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/19/t1211224270lwut01ooft88wva/2rkmd1211224217.ps (open in new window)


http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/19/t1211224270lwut01ooft88wva/3p4z21211224217.png (open in new window)
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/19/t1211224270lwut01ooft88wva/3p4z21211224217.ps (open in new window)


http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/19/t1211224270lwut01ooft88wva/49xv41211224217.png (open in new window)
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/19/t1211224270lwut01ooft88wva/49xv41211224217.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