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 computationWed, 15 Dec 2010 15:55:43 +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/Dec/15/t12924284351lkyb3q9rxr4i62.htm/, Retrieved Thu, 31 Oct 2024 22:46:07 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=110501, Retrieved Thu, 31 Oct 2024 22:46:07 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact145
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Univariate Data Series] [beschrijving] [2009-12-11 09:25:25] [517ac0676608e46c618c738721d88e41]
- R PD  [Univariate Data Series] [] [2010-12-10 14:31:22] [22937c5b58c14f6c22964f32d64ff823]
-   P     [Univariate Data Series] [] [2010-12-10 14:35:53] [22937c5b58c14f6c22964f32d64ff823]
-   P       [Univariate Data Series] [] [2010-12-10 14:41:14] [22937c5b58c14f6c22964f32d64ff823]
- R PD        [Univariate Data Series] [Paper Data Serie ...] [2010-12-15 14:34:53] [945bcebba5e7ac34a41d6888338a1ba9]
-   PD            [Univariate Data Series] [Paper Data Serie ...] [2010-12-15 15:55:43] [514029464b0621595fe21c9fa38c7009] [Current]
Feedback Forum

Post a new message
Dataseries X:
8388526
8512195
8602611
8625084
8653653
8703119
8757691
8798055
8840704
8896246
8951443
9026778
9078635
9128824
9178154
9189741
9251414
9328126
9428100
9499234
9556380
9605601
9631910
9660154
9650944
9695379
9726850
9756590
9788248
9813152
9823302
9837413
9841654
9855110
9863374
9854589
9858017
9853023
9857721
9858895
9864751
9875716
9927612
9947782
9986975
10021997
10068319
10100631
10130574
10143047
10170226
10192264
10213752
10239085
10263414
10309725
10355844
10396421
10445852




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=110501&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 time1 seconds
R Server'George Udny Yule' @ 72.249.76.132







Univariate Dataseries
Name of dataseriesBevolkingsaantal in België
SourceAlgemene Directie Statistiek en Economische Informatie van de FOD Economie, K.M.O., Middenstand en Energie
Description
Number of observations59

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Bevolkingsaantal in België \tabularnewline
Source & Algemene Directie Statistiek en Economische Informatie van de FOD Economie, K.M.O., Middenstand en Energie  \tabularnewline
Description &  \tabularnewline
Number of observations & 59 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=110501&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Bevolkingsaantal in België[/C][/ROW]
[ROW][C]Source[/C][C]Algemene Directie Statistiek en Economische Informatie van de FOD Economie, K.M.O., Middenstand en Energie [/C][/ROW]
[ROW][C]Description[/C][C][/C][/ROW]
[ROW][C]Number of observations[/C][C]59[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=110501&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=110501&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 dataseriesBevolkingsaantal in België
SourceAlgemene Directie Statistiek en Economische Informatie van de FOD Economie, K.M.O., Middenstand en Energie
Description
Number of observations59



Parameters (Session):
par1 = Bevolkingsaantal in België ; par2 = Algemene Directie Statistiek en Economische Informatie van de FOD Economie, K.M.O., Middenstand en Energie ; par4 = No season ;
Parameters (R input):
par1 = Bevolkingsaantal in België ; par2 = Algemene Directie Statistiek en Economische Informatie van de FOD Economie, K.M.O., Middenstand en Energie ; par3 = ; 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')