Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationMon, 31 Jul 2017 11:56:55 +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/Jul/31/t1501495301heasbkx44qgdsp5.htm/, Retrieved Wed, 15 May 2024 21:09:01 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=306833, Retrieved Wed, 15 May 2024 21:09:01 +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] [omzet vorken in e...] [2017-07-31 09:56:55] [7f8e680169e3605c7c9c65666ad372ce] [Current]
Feedback Forum

Post a new message
Dataseries X:
209704
208923
208131
206492
222706
221848
209704
201630
202411
202411
203280
204842
207273
207273
205711
201630
222706
225918
221067
209704
214566
207273
210562
212135
213774
209704
210562
204842
222706
228349
223498
214566
224279
213774
223498
222706
225137
216205
225918
225137
239712
236423
223498
216986
225918
213774
222706
224279
227568
220286
224279
226710
235642
228349
218636
208131
217855
191125
204061
211343
218636
208131
208131
208131
213774
205711
195129
186274
192698
167618
182985
191917
193556
184624
185405
182985
191125
185405
174130
165979
179762
149831
169268
178123
178123
167618
157905
157124
165979
157905
142549
131967
143330
116611
140899
153824
157905
148973
137687
145761
148973
146542
122243
110968
119031
94743
119823
128755
136037
123893
112530
119031
122243
115819
91531
80949
90662
63943
93093
110968




Summary of computational transaction
Raw Input view raw input (R code)
Raw Outputview raw output of R engine
Computing time0 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 time0 seconds \tabularnewline
R ServerBig Analytics Cloud Computing Center \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=306833&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]0 seconds[/C][/ROW] [ROW]R Server[/C]Big Analytics Cloud Computing Center[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=306833&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=306833&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 time0 seconds
R ServerBig Analytics Cloud Computing Center







Univariate Dataseries
Name of dataseriesomzet vorken in euro op jaarbasis
Source“niet gekend”
Descriptionde omzet van vorken in euro en op jaarbasis
Number of observations120

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & omzet vorken in euro op jaarbasis \tabularnewline
Source & “niet gekend” \tabularnewline
Description & de omzet van vorken in euro en op jaarbasis \tabularnewline
Number of observations & 120 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=306833&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]omzet vorken in euro op jaarbasis[/C][/ROW]
[ROW][C]Source[/C][C]“niet gekend”[/C][/ROW]
[ROW][C]Description[/C][C]de omzet van vorken in euro en op jaarbasis[/C][/ROW]
[ROW][C]Number of observations[/C][C]120[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=306833&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=306833&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 vorken in euro op jaarbasis
Source“niet gekend”
Descriptionde omzet van vorken in euro en op jaarbasis
Number of observations120







Summary Statistics of dataseries x
> summary(x)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
  63943  156299  203670  184543  216400  239712 

\begin{tabular}{lllllllll}
\hline
Summary Statistics of dataseries x \tabularnewline
> summary(x)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
  63943  156299  203670  184543  216400  239712 
\tabularnewline \hline \end{tabular} %Source: https://freestatistics.org/blog/index.php?pk=306833&T=2

[TABLE]
[ROW][C]Summary Statistics of dataseries x[/C][/ROW]
[ROW][C]
> summary(x)
   Min. 1st Qu.  Median    Mean 3rd Qu.    Max. 
  63943  156299  203670  184543  216400  239712 
[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=306833&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=306833&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. 
  63943  156299  203670  184543  216400  239712 



Parameters (Session):
par1 = omzet vorken in euro op jaarbasis ; par2 = “niet gekend” ; par3 = de omzet van vorken in euro en op jaarbasis ; par4 = 12 ;
Parameters (R input):
par1 = omzet vorken in euro op jaarbasis ; par2 = “niet gekend” ; par3 = de omzet van vorken in euro en op jaarbasis ; par4 = 12 ;
R code (references can be found in the software module):
par4 <- '12'
par3 <- 'de omzet van vorken in euro en op jaarbasis'
par2 <- '“niet gekend”'
par1 <- 'omzet vorken in euro op 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')