Home » date » 2008 » May » 31 »

Wisselkoersen - Referentiewisselkoersen voor de euro in nationale munteenheden - Dollar van de Verenigde Staten

R Software Module: rwasp_decompose.wasp (opens new window with default values)
Title produced by software: Classical Decomposition
Date of computation: Sat, 31 May 2008 00:46:30 -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/31/t1212216427qecenfzzcdmqefr.htm/, Retrieved Sat, 31 May 2008 06:47:07 +0000
 
User-defined keywords:
 
Dataseries X:
» Textbox « » Textfile « » CSV «
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
 
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 time3 seconds
R Server'Sir Ronald Aylmer Fisher' @ 193.190.124.24


Classical Decomposition by Moving Averages
tObservationsFitTrendSeasonalRandom
10.9383NANA0.0184368055555556NA
20.9217NANA0.00748763888888876NA
30.9095NANA0.000842638888888973NA
40.892NANA-0.00809069444444444NA
50.8742NANA0.0120776388888889NA
60.8532NANA0.00411180555555547NA
70.86070.8926443055555560.893358333333333-0.000714027777777767-0.0319443055555556
80.90050.8793818055555560.8889125-0.009530694444444420.0211181944444444
90.91110.8691418055555560.885354166666667-0.01621236111111110.0419581944444445
100.90590.8676209722222220.883691666666667-0.01607069444444440.0382790277777777
110.88830.8767468055555560.885216666666667-0.008469861111111060.0115531944444444
120.89240.9073901388888890.8912583333333330.0161318055555556-0.014990138888889
130.88330.9194326388888890.9009958333333330.0184368055555556-0.0361326388888890
140.870.9171834722222220.9096958333333330.00748763888888876-0.0471834722222222
150.87580.9166634722222220.9158208333333330.000842638888888973-0.0408634722222223
160.88580.9137676388888890.921858333333333-0.00809069444444444-0.0279676388888888
170.9170.9417818055555560.9297041666666670.0120776388888889-0.0247818055555555
180.95540.9437743055555550.93966250.004111805555555470.0116256944444447
190.99220.9516484722222220.9523625-0.0007140277777777670.0405515277777778
200.97780.9589234722222220.968454166666667-0.009530694444444420.0188765277777779
210.98080.9694168055555560.985629166666667-0.01621236111111110.0113831944444445
220.98110.986387638888891.00245833333333-0.0160706944444444-0.00528763888888906
231.00141.012330138888891.0208-0.00846986111111106-0.0109301388888887
241.01831.055769305555561.03963750.0161318055555556-0.0374693055555555
251.06221.072903472222221.054466666666670.0184368055555556-0.0107034722222221
261.07731.073666805555561.066179166666670.007487638888888760.00363319444444432
271.08071.078584305555561.077741666666670.0008426388888889730.00211569444444448
281.08481.083380138888891.09147083333333-0.008090694444444440.00141986111111114
291.15821.118419305555561.106341666666670.01207763888888890.0397806944444443
301.16631.126249305555561.12213750.004111805555555470.0400506944444443
311.13721.138481805555561.13919583333333-0.000714027777777767-0.00128180555555546
321.11391.145765138888891.15529583333333-0.00953069444444442-0.0318651388888891
331.12221.152950138888891.1691625-0.0162123611111111-0.0307501388888889
341.16921.163891805555561.1799625-0.01607069444444440.00530819444444464
351.17021.178000972222221.18647083333333-0.00846986111111106-0.00780097222222231
361.22861.206352638888891.190220833333330.01613180555555560.0222473611111109
371.26131.214361805555561.1959250.01843680555555560.0469381944444447
381.26461.211458472222221.203970833333330.007487638888888760.053141527777778
391.22621.213284305555561.212441666666670.0008426388888889730.0129156944444446
401.19851.211825972222221.21991666666667-0.00809069444444444-0.0133259722222223
411.20071.240690138888891.22861250.0120776388888889-0.0399901388888886
421.21381.242770138888891.238658333333330.00411180555555547-0.028970138888889
431.22661.244727638888891.24544166666667-0.000714027777777767-0.0181276388888889
441.21761.239552638888891.24908333333333-0.00953069444444442-0.0219526388888887
451.22181.238316805555561.25452916666667-0.0162123611111111-0.0165168055555556
461.2491.246341805555561.2624125-0.01607069444444440.00265819444444437
471.29911.260775972222221.26924583333333-0.008469861111111060.0383240277777779
481.34081.288352638888891.272220833333330.01613180555555560.0524473611111114
491.31191.289815972222221.271379166666670.01843680555555560.0220840277777781
501.30141.278395972222221.270908333333330.007487638888888760.0230040277777779
511.32011.272392638888891.271550.0008426388888889730.0477073611111112
521.29381.261638472222221.26972916666667-0.008090694444444440.0321615277777778
531.26941.274806805555561.262729166666670.0120776388888889-0.00540680555555517
541.21651.255353472222221.251241666666670.00411180555555547-0.0388534722222222
551.20371.239827638888891.24054166666667-0.000714027777777767-0.0361276388888889
561.22921.222294305555561.231825-0.009530694444444420.00690569444444455
571.22561.206208472222221.22242083333333-0.01621236111111110.0193915277777776
581.20151.198650138888891.21472083333333-0.01607069444444440.00284986111111118
591.17861.203788472222221.21225833333333-0.00846986111111106-0.025188472222222
601.18561.230727638888891.214595833333330.0161318055555556-0.0451276388888886
611.21031.237749305555561.21931250.0184368055555556-0.0274493055555558
621.19381.231658472222221.224170833333330.00748763888888876-0.0378584722222222
631.2021.229138472222221.228295833333330.000842638888888973-0.0271384722222221
641.22711.224650972222221.23274166666667-0.008090694444444440.00244902777777822
651.2771.251865138888891.23978750.01207763888888890.0251348611111111
661.2651.254115972222221.250004166666670.004111805555555470.0108840277777775
671.26841.258677638888891.25939166666667-0.0007140277777777670.00972236111111102
681.28111.258327638888891.26785833333333-0.009530694444444420.0227723611111110
691.27271.261470972222221.27768333333333-0.01621236111111110.011229027777778
701.26111.271891805555561.2879625-0.0160706944444444-0.0107918055555554
711.28811.287767638888891.2962375-0.008469861111111060.000332361111111235
721.32131.318660972222221.302529166666670.01613180555555560.00263902777777791
731.29991.328470138888891.310033333333330.0184368055555556-0.0285701388888888
741.30741.325200138888891.31771250.00748763888888876-0.0178001388888889
751.32421.326805138888891.32596250.000842638888888973-0.00260513888888880
761.35161.329475972222221.33756666666667-0.008090694444444440.0221240277777779
771.35111.363890138888891.35181250.0120776388888889-0.0127901388888885
781.34191.369090972222221.364979166666670.00411180555555547-0.0271909722222221
791.3716NANA-0.000714027777777767NA
801.3622NANA-0.00953069444444442NA
811.3896NANA-0.0162123611111111NA
821.4227NANA-0.0160706944444444NA
831.4684NANA-0.00846986111111106NA
841.457NANA0.0161318055555556NA
 
Charts produced by software:
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/31/t1212216427qecenfzzcdmqefr/11no91212216385.png (open in new window)
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/31/t1212216427qecenfzzcdmqefr/11no91212216385.ps (open in new window)


http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/31/t1212216427qecenfzzcdmqefr/2zgvw1212216385.png (open in new window)
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/31/t1212216427qecenfzzcdmqefr/2zgvw1212216385.ps (open in new window)


http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/31/t1212216427qecenfzzcdmqefr/355s81212216385.png (open in new window)
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/31/t1212216427qecenfzzcdmqefr/355s81212216385.ps (open in new window)


http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/31/t1212216427qecenfzzcdmqefr/43jro1212216385.png (open in new window)
http://127.0.0.1/wessadotnet/public_html/freestatisticsdotorg/blog/date/2008/May/31/t1212216427qecenfzzcdmqefr/43jro1212216385.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