Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationSat, 11 Oct 2008 11:14:07 -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/11/t1223745340mvwkatpi5z4ytmk.htm/, Retrieved Sun, 19 May 2024 15:54:24 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=15347, Retrieved Sun, 19 May 2024 15:54:24 +0000
QR Codes:

Original text written by user:Dieselprijzen van 01/01/2000 tem 01/01/2005
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact201
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
F       [Univariate Data Series] [Dieselprijzen] [2008-10-11 17:14:07] [e08fee3874f3333d6b7a377a061b860d] [Current]
-   P     [Univariate Data Series] [Tijdreeks 1 Diese...] [2008-10-15 13:26:40] [819b576fab25b35cfda70f80599828ec]
-   P       [Univariate Data Series] [Tijdreeks 1 Diese...] [2008-10-15 13:51:09] [819b576fab25b35cfda70f80599828ec]
-   PD        [Univariate Data Series] [Literprijzen EURO 95] [2008-12-02 18:01:32] [6fea0e9a9b3b29a63badf2c274e82506]
Feedback Forum
2008-10-18 10:18:25 [Matthieu Blondeau] [reply
In het begin van de grafiek is er een vrij steile outlier die valt rond eind 2000. Misschien is hier toen iets gebeurd. In onderstaand document staat wat uitleg over de stijging, weliswaar in Nederland maar ik neem aan dat in België de oorzaak dezelfde was.

http://www.energie.nl/dossier/evn00f-1.pdf
2008-10-18 12:12:15 [Tom Ardies] [reply
De uitschieter in het begin zal voor problemen zorgen. Je kan ofwel die waarde eruit halen, maar dit moet je dan wel melden in je documenten of een andere dataset zoeken.
2008-10-19 12:09:12 [Jan Helsen] [reply
Ik heb dezelfde commentaar. Probeer de outliner in het begin te verklaren en nadien op een correcte wijze weg te werken. Ik zou met gemiddeldes werken.
2008-10-20 18:28:29 [Niels Stas] [reply
Ik kan me alleen maar aansluiten bij de voorgangers. De uitschieters kunnen mogelijk voor problemen zorgen indien hier geen gegronde uitleg voor is. Als je deze kan wegwerken kan dit nog steeds een nuttige tijdreeks zijn.
2008-10-20 20:35:13 [Evelyne Slegers] [reply
De uitschieter kan inderdaad voor problemen zorgen. Als je een logische verklaring vindt kan deze tijdreeks nog nuttig zijn.

Post a new message
Dataseries X:
0.771
0.751
0.766
0.754
0.773
0.781
0.793
0.791
0.878
0.873
0.897
0.885
0.796
0.776
0.788
0.786
0.801
0.811
0.801
0.781
0.778
0.759
0.764
0.754
0.749
0.729
0.740
0.781
0.768
0.754
0.754
0.754
0.779
0.799
0.780
0.769
0.801
0.792
0.852
0.807
0.797
0.783
0.779
0.785
0.817
0.810
0.798
0.795
0.785
0.785
0.785
0.805
0.824
0.819
0.827
0.826
0.829
0.830
0.825
0.817




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 seconds
R Server'Sir Ronald Aylmer Fisher' @ 193.190.124.24

\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 & 'Sir Ronald Aylmer Fisher' @ 193.190.124.24 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=15347&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]'Sir Ronald Aylmer Fisher' @ 193.190.124.24[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=15347&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=15347&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'Sir Ronald Aylmer Fisher' @ 193.190.124.24







Univariate Dataseries
Name of dataseriesDieselprijzen
Source
DescriptionPrijzen van diesel van 01/01/2000 tem 01/01/2005
Number of observations60

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Dieselprijzen \tabularnewline
Source &  \tabularnewline
Description & Prijzen van diesel van 01/01/2000 tem 01/01/2005 \tabularnewline
Number of observations & 60 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=15347&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Dieselprijzen[/C][/ROW]
[ROW][C]Source[/C][C][/C][/ROW]
[ROW][C]Description[/C][C]Prijzen van diesel van 01/01/2000 tem 01/01/2005[/C][/ROW]
[ROW][C]Number of observations[/C][C]60[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=15347&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=15347&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 dataseriesDieselprijzen
Source
DescriptionPrijzen van diesel van 01/01/2000 tem 01/01/2005
Number of observations60



Parameters (Session):
par1 = Dieselprijzen ; par3 = Prijzen van diesel van 01/01/2000 tem 01/01/2005 ;
Parameters (R input):
par1 = Dieselprijzen ; par2 = ; par3 = Prijzen van diesel van 01/01/2000 tem 01/01/2005 ;
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')