Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationWed, 16 Aug 2017 23:11:14 +0200
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2017/Aug/17/t15029528108rgpynwqr3zmzwf.htm/, Retrieved Fri, 10 May 2024 04:50:57 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=307540, Retrieved Fri, 10 May 2024 04:50:57 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact139
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Univariate Data Series] [stap 2 reeks a] [2017-08-16 21:11:14] [d9d1e371745129452d69402640252d41] [Current]
Feedback Forum

Post a new message
Dataseries X:
5452304
5431998
5411406
5368792
5790356
5768048
5452304
5242380
5262686
5262686
5285280
5325892
5389098
5389098
5348486
5242380
5790356
5873868
5747742
5452304
5578716
5389098
5474612
5515510
5558124
5452304
5474612
5325892
5790356
5937074
5810948
5578716
5831254
5558124
5810948
5790356
5853562
5621330
5873868
5853562
6232512
6146998
5810948
5641636
5873868
5558124
5790356
5831254
5916768
5727436
5831254
5894460
6126692
5937074
5684536
5411406
5664230
4969250
5305586
5494918
5684536
5411406
5411406
5411406
5558124
5348486
5073354
4843124
5010148
4358068
4757610
4989842
5032456
4800224
4820530
4757610
4969250
4820530
4527380
4315454
4673812
3895606
4400968
4631198
4631198
4358068
4105530
4085224
4315454
4105530
3706274
3431142
3726580
3031886
3663374
3999424
4105530
3873298
3579862
3789786
3873298
3810092
3178318
2885168
3094806
2463318
3115398
3347630
3536962
3221218
2925780
3094806
3178318
3011294
2379806
2104674
2357212
1662518
2420418
2885168




Summary of computational transaction
Raw Input view raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R ServerBig Analytics Cloud Computing Center

\begin{tabular}{lllllllll}
\hline
Summary of computational transaction \tabularnewline
Raw Input view raw input (R code)  \tabularnewline
Raw Outputview raw output of R engine  \tabularnewline
Computing time1 seconds \tabularnewline
R ServerBig Analytics Cloud Computing Center \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=307540&T=0

[TABLE]
[ROW]
Summary of computational transaction[/C][/ROW] [ROW]Raw Input[/C] view raw input (R code) [/C][/ROW] [ROW]Raw Output[/C]view raw output of R engine [/C][/ROW] [ROW]Computing time[/C]1 seconds[/C][/ROW] [ROW]R Server[/C]Big Analytics Cloud Computing Center[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=307540&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=307540&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 Outputview raw output of R engine
Computing time1 seconds
R ServerBig Analytics Cloud Computing Center







Univariate Dataseries
Name of dataseriesOmzet product printpapier (EUR jaarbasis)
Sourceniet gekend
DescriptionOmzet overzicht printpapier jan 2007 t.e.m dec 2016 uitgedrukt in EUR.
Number of observations120

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Omzet product printpapier (EUR jaarbasis) \tabularnewline
Source & niet gekend \tabularnewline
Description & Omzet overzicht printpapier jan 2007 t.e.m dec 2016 uitgedrukt in EUR. \tabularnewline
Number of observations & 120 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=307540&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Omzet product printpapier (EUR jaarbasis)[/C][/ROW]
[ROW][C]Source[/C][C]niet gekend[/C][/ROW]
[ROW][C]Description[/C][C]Omzet overzicht printpapier jan 2007 t.e.m dec 2016 uitgedrukt in EUR.[/C][/ROW]
[ROW][C]Number of observations[/C][C]120[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=307540&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=307540&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 dataseriesOmzet product printpapier (EUR jaarbasis)
Sourceniet gekend
DescriptionOmzet overzicht printpapier jan 2007 t.e.m dec 2016 uitgedrukt in EUR.
Number of observations120







Summary Statistics of dataseries x
> summary(x)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
1662518 4063774 5295433 4798105 5626406 6232512 

\begin{tabular}{lllllllll}
\hline
Summary Statistics of dataseries x \tabularnewline
> summary(x)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
1662518 4063774 5295433 4798105 5626406 6232512 
\tabularnewline \hline \end{tabular} %Source: https://freestatistics.org/blog/index.php?pk=307540&T=2

[TABLE]
[ROW][C]Summary Statistics of dataseries x[/C][/ROW]
[ROW][C]
> summary(x)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
1662518 4063774 5295433 4798105 5626406 6232512 
[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=307540&T=2

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

As an alternative you can also use a QR Code:  

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

Summary Statistics of dataseries x
> summary(x)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
1662518 4063774 5295433 4798105 5626406 6232512 



Parameters (Session):
Parameters (R input):
par1 = Omzet product printpapier (EUR jaarbasis) ; par2 = niet gekend ; par3 = Omzet overzicht printpapier jan 2007 t.e.m dec 2016 uitgedrukt in EUR. ; par4 = 12 ;
R code (references can be found in the software module):
par4 <- '12'
par3 <- 'Omzet overzicht printpapier jan '07 - dec '16 uitgedrukt in EUR.'
par2 <- 'niet gekend'
par1 <- 'Omzet product printpapier (EUR jaarbasis)'
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')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Summary Statistics of dataseries x',1,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,paste('
',RC.texteval('summary(x)'),'
',sep=''))
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable1.tab')