Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationMon, 13 Oct 2008 12:59:10 -0600
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2008/Oct/13/t1223924444qz4hqv681xe5txm.htm/, Retrieved Mon, 28 Sep 2026 12:48:35 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=15939, Retrieved Mon, 28 Sep 2026 12:48:35 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact578
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
F       [Univariate Data Series] [wisselkoers] [2008-10-13 18:59:10] [a8228479d4547a92e2d3f176a5299609] [Current]
-   PD    [Univariate Data Series] [index der consump...] [2008-10-19 11:17:46] [4ad596f10399a71ad29b7d76e6ab90ac]
-   PD      [Univariate Data Series] [bezineprijs 95] [2008-10-19 11:22:46] [4ad596f10399a71ad29b7d76e6ab90ac]
-   PD        [Univariate Data Series] [gezondheidsindex] [2008-10-19 11:26:20] [4ad596f10399a71ad29b7d76e6ab90ac]
-   PD          [Univariate Data Series] [prijsevolutie tabak] [2008-10-19 11:32:03] [4ad596f10399a71ad29b7d76e6ab90ac]
Feedback Forum
2008-10-15 15:21:28 [38efa5667674854c9d806c2ba197f9e0] [reply] 
Een beschrijving bij deze grafiek is wel nodig aangezien deze zo op meerdere manieren interpreteerbaar is. Wordt 1 dollar uitgedrukt in euro, of 1 euro in dollars?
2008-10-17 08:34:52 [Thomas Beyers] [reply] 
2008-10-17 08:35:53 [Thomas Beyers] [reply] 
Als je een tijdreeks hebt met wisselkoers is het moeilijk om voorspellingen te maken. Probeer meer stabielere tijdreeksen te zoeken.
2008-10-19 14:36:39 [e9c861930c027d1bae8828281431911e] [reply] 
als je de tijdreeks goed bekijkt dan zie je dat het gaat over de stijging van de dollar gedurende een bepaalde periode. hoe de dollar wordt uitgedrukt tegen over de euro is hier naast de kwestie. ( repliek op vorige student ) Ik denk dat deze grafiek en de nodige uitleg in het word document voldoende zijn om te weten wat hier gaat gebeuren.
2008-10-19 14:46:25 [Mehmet Yilmaz] [reply] 
Lijkt me een goede tijdreeks. Wel zien dat je de sterke stijging kan verantwoorden.
2008-10-19 20:13:21 [Evelien Blockx] [reply] 
Dit is naar mijn mening een goede tijdreeks. Ik zou, net zoals de vorige student al zei, eens op zoek gaan naar een reden voor de sterke stijging.
2008-10-19 20:33:10 [2b91075c702c6e89854c34747e80ec72] [reply] 
Lijkt me een goede tijdreeks. Geen outliers, geen negatieve waarden, geen veranderingen,... Een goede reekst om te analyseren dus. Om voorspellingen te doen ligt dit misschien iets moeilijker omdat je nooit niet echt op voorhand weet hoe de wisselkoers in de toekomst kan veranderen. De stijging van de grafiek kan je misschien ook eens nagaan zodat je kan verklaren vanwaar die eventueel komt.
2008-10-20 13:51:10 [Siem Van Opstal] [reply] 
Interessante verbanden om te analyseren. Ook de tijdreeksen zelf zien er goed uit. Ze zijn niet constant dus er valt veel over te zeggen. Er zitten geen uitschieters of crashes in... Er moet enkele nog een titel aan de grafiek gegeven worden.
2008-10-20 14:13:47 [Dries Van Gheluwe] [reply] 
Goede tijdreeksen met een interessante uitbreiding op de laatste jaren.
2008-10-20 17:04:36 [Bernard Femont] [reply] 
mooie oplopende reeks met genoeg observaties, geen outlier, geen seisoenaliteit, een goede reeks zonder gevaren.
2008-10-20 17:05:38 [Bernard Femont] [reply] 
titel en assenbenoeming zou het een duidelijkere grafiek maken
2008-10-20 17:07:15 [Bernard Femont] [reply] 
assen toch benoemd, sorry
2008-10-20 18:04:30 [0da8ca6c46830c93169756afa1dc11e0] [reply] 
Mooie grafiek, oplopend, geen extreme uitschieters
2008-10-20 19:56:05 [Evelyne Slegers] [reply] 
Dit is een goede tijdreeks. Er zijn niet echt felle uitschieters of sterke dalingen. Het is interessant om te analyseren hoe het komt dat de grafiek geleidelijk aan stijgt.
2008-10-21 07:24:17 [Jens Peeters] [reply] 
Een mooi, stijgende grafiek zonder uitschieters. De stijging op het einde moet wel verklaard worden.

Post a new message
Dataseries X:
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
1,4748
1,5527
1,575
1,5557
1,5553




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'Herman Ole Andreas Wold' @ 193.190.124.10:1001

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input & view raw input (R code)  \tabularnewline
Raw Output & view raw output of R engine  \tabularnewline
Computing time & 2 seconds \tabularnewline
R Server & 'Herman Ole Andreas Wold' @ 193.190.124.10:1001 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=15939&T=0

[TABLE]
[ROW][C]Summary of computational transaction[/C][/ROW]
[ROW][C]Raw Input[/C][C]view raw input (R code) [/C][/ROW]
[ROW][C]Raw Output[/C][C]view raw output of R engine [/C][/ROW]
[ROW][C]Computing time[/C][C]2 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Herman Ole Andreas Wold' @ 193.190.124.10:1001[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=15939&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=15939&T=0

As an alternative you can also use a QR Code:  

The GUIDs for individual cells are displayed in the table below:

Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'Herman Ole Andreas Wold' @ 193.190.124.10:1001







Univariate Dataseries
Name of dataserieswisselkoers $
Sourcehttp://www.nbb.be/belgostat/PublicatieSelectieLinker?LinkID=451000038|910000082&Lang=N
Descriptionwisselkoers
Number of observations60

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & wisselkoers $ \tabularnewline
Source & http://www.nbb.be/belgostat/PublicatieSelectieLinker?LinkID=451000038|910000082&Lang=N \tabularnewline
Description & wisselkoers \tabularnewline
Number of observations & 60 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=15939&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]wisselkoers $[/C][/ROW]
[ROW][C]Source[/C][C]http://www.nbb.be/belgostat/PublicatieSelectieLinker?LinkID=451000038|910000082&Lang=N[/C][/ROW]
[ROW][C]Description[/C][C]wisselkoers[/C][/ROW]
[ROW][C]Number of observations[/C][C]60[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=15939&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=15939&T=1

As an alternative you can also use a QR Code:  

The GUIDs for individual cells are displayed in the table below:

Univariate Dataseries
Name of dataserieswisselkoers $
Sourcehttp://www.nbb.be/belgostat/PublicatieSelectieLinker?LinkID=451000038|910000082&Lang=N
Descriptionwisselkoers
Number of observations60



Parameters (Session):
par1 = wisselkoers $ ; par2 = http://www.nbb.be/belgostat/PublicatieSelectieLinker?LinkID=451000038|910000082&Lang=N ; par3 = wisselkoers ;
Parameters (R input):
par1 = wisselkoers $ ; par2 = http://www.nbb.be/belgostat/PublicatieSelectieLinker?LinkID=451000038|910000082&Lang=N ; par3 = wisselkoers ;
R code (references can be found in the software module):
bitmap(file='test1.png')
plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Univariate Dataseries',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Name of dataseries',header=TRUE)
a<-table.element(a,par1)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Source',header=TRUE)
a<-table.element(a,par2)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Description',header=TRUE)
a<-table.element(a,par3)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Number of observations',header=TRUE)
a<-table.element(a,length(x))
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')