Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*Unverified author*

R Software Module

rwasp_univariatedataseries.wasp

Title produced by software

Univariate Data Series

Date of computation

Tue, 28 Sep 2010 18:20:38 +0000

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Sep/28/t1285698201m09ao0m5dflql66.htm/, Retrieved Sun, 28 Apr 2024 22:29:59 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=79609, Retrieved Sun, 28 Apr 2024 22:29:59 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

KDGP1W1

Estimated Impact

171

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-       [Univariate Data Series] [evolutie prijs da...] [2010-09-28 18:20:38] [d05b5f5c1bde1241a89791f96cf6e071] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

2005-12    	377.74
2005-11    	377.51
2005-10    	377.5
2005-09    	375.76
2005-08    	375.69
2005-07    	375.75
2005-06    	375.75
2005-05    	375.75
2005-04    	375.58
2005-03    	374.51
2005-02    	372.55
2005-01    	370.2
2004-12    	370.2
2004-11    	370.29
2004-10    	370.29
2004-09    	370.21
2004-08    	370.22
2004-07    	370.58
2004-06    	370.58
2004-05    	370.46
2004-04    	370.46
2004-03    	370.45
2004-02    	369.05
2004-01    	365.22
2003-12    	363.67
2003-11    	364.54
2003-10    	364.63
2003-09    	364.59
2003-08    	365.5
2003-07    	365.5
2003-06    	365.51
2003-05    	365.51
2003-04    	364.14
2003-03    	363.61
2003-02    	363.19
2003-01    	361.58
2002-12    	361
2002-11    	361
2002-10    	361.01
2002-09    	361
2002-08    	360.97
2002-07    	360.79
2002-06    	360.63
2002-05    	360.28
2002-04    	357.04
2002-03    	356.36
2002-02    	355.52
2002-01    	350.89
2001-12    	349.91
2001-11    	349.91
2001-10    	349.68
2001-09    	349.66
2001-08    	349.61
2001-07    	349.28
2001-06    	349.26
2001-05    	349.26
2001-04    	349.43
2001-03    	348.5
2001-02    	336.93
2001-01    	326.91
2000-12    	326.9
2000-11    	326.9
2000-10    	326.74
2000-09    	326.39
2000-08    	326.35
2000-07    	326.35
2000-06    	326.35
2000-05    	326.28
2000-04    	326.23
2000-03    	325.59
2000-02    	321.59
2000-01    	317.05
1999-12    	317
1999-11    	317.04
1999-10    	317.08
1999-09    	317
1999-08    	317.07
1999-07    	317.07
1999-06    	317.01
1999-05    	316.98
1999-04    	316.26
1999-03    	315.27
1999-02    	314.93
1999-01    	314.65
1998-12    	314.65
1998-11    	314.63
1998-10    	314.57
1998-09    	313.99
1998-08    	315.77
1998-07    	315.77
1998-06    	315.77
1998-05    	315.73
1998-04    	315.43
1998-03    	315.07
1998-02    	312.97
1998-01    	310.95

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	9 seconds
R Server	'George Udny Yule' @ 72.249.76.132

\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 & 9 seconds \tabularnewline
R Server & 'George Udny Yule' @ 72.249.76.132 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=79609&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]9 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'George Udny Yule' @ 72.249.76.132[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=79609&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=79609&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 Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	9 seconds
R Server	'George Udny Yule' @ 72.249.76.132

Parameters (Session):

par1 = damesfiets ; par2 = www.belgostat.be ; par3 = De evolutie van de prijs van damesfietsen vanaf januari 1998 tot en met december 2005 ; par4 = No season ;

Parameters (R input):

par1 = damesfiets ; par2 = www.belgostat.be ; par3 = De evolutie van de prijs van damesfietsen vanaf januari 1998 tot en met december 2005 ; par4 = No season ;

R code (references can be found in the software module):

if (par4 != 'No season') {
par4 <- as.numeric(par4)
if (par4 < 4) par4 <- 12
}
summary(x)
n <- length(x)
bitmap(file='test1.png')
if (par4=='No season') {
plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab,xaxt='n')
axis(1,at=seq(1,n,10))
}
if (par4!='No season') {
plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab,xaxt='n')
axis(1,at=seq(1,n,par4))
grid(nx=0,ny=NULL,col='black')
abline(v=seq(1,n,par4),col='black',lty='dotted')
}
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')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code