FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*Unverified author*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationSun, 13 Aug 2017 15:20:43 +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/13/t1502630475yt9o8mrn1w0uil1.htm/, Retrieved Fri, 10 May 2024 22:23:37 +0200
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=, Retrieved Fri, 10 May 2024 22:23:37 +0200
QR Codes:

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

Tree of Dependent Computations

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
1684800
1622400
1716000
1372800
1778400
1747200
1872000
1934400
2152800
1872000
1778400
2215200
1872000
1404000
1653600
1248000
1747200
1435200
1903200
1716000
1809600
2028000
1996800
2371200
1716000
1435200
1591200
1154400
1653600
1279200
1809600
1716000
1528800
2184000
1965600
2246400
1684800
1560000
1404000
1154400
1528800
1372800
1872000
1809600
1560000
2090400
1934400
2496000
1996800
1216800
1216800
1216800
1435200
1435200
1934400
1778400
1591200
1996800
1840800
2652000
2090400
1216800
1279200
1060800
1466400
1684800
2121600
2090400
1684800
1965600
1747200
2496000
1903200
1528800
1372800
1029600
1528800
1840800
2152800
2028000
1497600
2152800
1684800
2589600
2152800
1560000
1435200
967200
1528800
1466400
2215200
2215200
1684800
2184000
1622400
2527200
2152800
1591200
1216800
842400
1653600
1591200
2090400
2402400
1778400
1996800
1497600
2589600

Tables (Output of Computation)





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=&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=&T=0

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


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = Default12480.0112120.011210,111010012additive1212aantal verkochte tijdschriften 'Linda'aantal verkochte tijdschriften 'Linda'aantal verkochte tijdschriften 'Linda'aantal verkochte tijdschriften 'Linda' ; par2 = 110.9912SingleSingle//// ; par3 = 001additiveadditiveDeze cijferreeks toont alle verkochte tijdschriften 'Linda'Deze cijferreeks toont alle verkochte tijdschriften 'Linda'Deze cijferreeks toont alle verkochte tijdschriften 'Linda'Deze cijferreeks toont alle verkochte tijdschriften 'Linda' ; par4 = 000121212121212 ; par5 = 121212 ; par6 = White NoiseWhite NoiseWhite Noise ; par7 = 0.950.95 ;
Parameters (R input):
par1 = aantal verkochte tijdschriften ; par2 = / ; par3 = Deze cijferreeks toont alle verkochte tijdschriften ; par4 = 12 ;
R code (references can be found in the software module):
par4 <- '12'
par3 <- 'Deze cijferreeks toont alle verkochte tijdschriften 'Linda''
par2 <- '/'
par1 <- 'aantal verkochte tijdschriften 'Linda''
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')