FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

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 computationSun, 28 Nov 2010 12:38:30 +0000
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2010/Nov/28/t1290947853yf2gebfeozmqtfr.htm/, Retrieved Thu, 02 May 2024 23:10:18 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=102521, Retrieved Thu, 02 May 2024 23:10:18 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact159

Tree of Dependent Computations

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Univariate Data Series] [] [2009-10-12 09:03:04] [ebd107afac1bd6180acb277edd05815b]
- RMPD    [Univariate Data Series] [Paper - Werkloosh...] [2010-11-28 12:38:30] [cfd788255f1b1b5389e58d7f218c70bf] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
130.113
130.789
131.258
129.182
129.082
130.037
132.317
131.336
132.357
140.181
138.542
140.615
140.276
140.762
140.677
138.648
138.753
138.815
141.297
139.439
139.7
138.792
137.402
139.356
139.775
139.714
138.525
137.572
137.612
136.904
139.763
138.613
135.865
131.506
128.639
128.207
128.092
125.914
122.422
120.878
118.131
115.061
120.475
119.962
114.188
112.201
110.012
111.064
111.327
109.579
107.088
106.191
102.951
104.63
110.142
109.36
104.784
103.692
103.631
106.906
109.176
110.478
111.678
111.83
110.364
112.604
118.238
118.201
113.403
112.426
112.052
116.272
117.313

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time3 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 & 3 seconds \tabularnewline
R Server & 'George Udny Yule' @ 72.249.76.132 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=102521&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]3 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=102521&T=0

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

As an alternative you can also use a QR Code:  
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 time3 seconds
R Server'George Udny Yule' @ 72.249.76.132






Univariate Dataseries
Name of dataseries40-50 jaar (Leeftijd)
Sourcebelgostat.be
DescriptionDe werkloosheid in tijd
Number of observations73

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & 40-50 jaar (Leeftijd) \tabularnewline
Source & belgostat.be \tabularnewline
Description & De werkloosheid in tijd \tabularnewline
Number of observations & 73 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=102521&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]40-50 jaar (Leeftijd)[/C][/ROW]
[ROW][C]Source[/C][C]belgostat.be[/C][/ROW]
[ROW][C]Description[/C][C]De werkloosheid in tijd[/C][/ROW]
[ROW][C]Number of observations[/C][C]73[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=102521&T=1

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

As an alternative you can also use a QR Code:  
QR Code


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

Univariate Dataseries
Name of dataseries40-50 jaar (Leeftijd)
Sourcebelgostat.be
DescriptionDe werkloosheid in tijd
Number of observations73


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = 40-50 jaar (Leeftijd) ; par2 = belgostat.be ; par3 = De werkloosheid in tijd ; par4 = 12 ;
Parameters (R input):
par1 = 40-50 jaar (Leeftijd) ; par2 = belgostat.be ; par3 = De werkloosheid in tijd ; par4 = 12 ;
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')