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 computationWed, 16 Feb 2011 10:53:32 +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/2011/Feb/16/t1297853615g3vhiwta3eknugy.htm/, Retrieved Wed, 22 May 2024 03:48:47 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=118332, Retrieved Wed, 22 May 2024 03:48:47 +0000
QR Codes:

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

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] [opgave 1] [2011-02-16 10:53:32] [93d78dde8d64c5a73537ad1fcc88d508] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
2005 01  593.9520
 2005 02  8994•8768
 2005 03  8095•3652
 2005 04  8594.2882
 2005 05  894•4937
 2005 06  8297.5432
 2005 07  2494.0816
 2005 08  2197.3899
 2005 09  3795•0221
 2005 10  4594.9881
 2005 11  8595•0373
 2005 12  4896.0313
 2006 01 8195.4506
 2006 02 2496•0419
 2006 03 6597.3338
 2006 04 2295•0513
 2006 05 5496.3528
 2006 06 9099•5659
 2006 07 9196.7517
 2006 08 2899.9053
 2006 09 9699•0529
 2006 10 3897.9852
 2006 11 1496•9578
 2006 12 7498.2424
 2007 01  7097.6192
 2007 02  9099.0000
 2007 03  1299.8850
 2007 04  9298.6156
 2007 05  6799.4976
 2007 06  9102.2206
 2007 07  8799•2489
 2007 08  42102•2698
 2007 09  1101.8942
 2007 10  9100.0427
 2007 11  6599.6442
 2007 12  5100•0620
 2008 01 1299.6871
 2008 02 4499.4249
 2008 03 9999•6135
 2008 04 9197•7037
 2008 05 6397•4211
 2008 06 1599•8036
 2008 07 6597•4265
 2008 08 3398.4410
 2008 09 4593•9098
 2008 10 6793•5827
 2008 11 6692•1032
 2008 12 8991.1836
 2009 01  7189.0975
 2009 02  7288•0342
 2009 03  2887.1286
 2009 04  4184.4334
 2009 05  8284•7667
 2009 06  2487.1401
 2009 07  386•7451
 2009 08  9989•6846
 2009 09  4189•0361
 2009 10  4588•4264
 2009 11  6988•4586
 2009 12  9589.6400
 2010 01 3990•4491
 2010 02 8190•0399
 2010 03 2790.9863
 2010 04 8890•0470
 2010 05 8991.7101
 2010 06 294.5005
 2010 07 493.4411
 2010 08 6195.7264
 2010 09 3194•6515
 2010 10 393•8309
 2010 11 5293.3321
 2010 12 2194•7613

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time0 seconds
R Server'Herman Ole Andreas Wold' @ www.yougetit.org

\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 & 0 seconds \tabularnewline
R Server & 'Herman Ole Andreas Wold' @ www.yougetit.org \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=118332&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]0 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Herman Ole Andreas Wold' @ www.yougetit.org[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=118332&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=118332&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 time0 seconds
R Server'Herman Ole Andreas Wold' @ www.yougetit.org


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = industriële productie ; par2 = http://www.economagic.com/em-cgi/data.exe/frbg17/B50001_ipnsa ; par3 = een stijgende lijn ; par4 = 12 ;
Parameters (R input):
par1 = industriële productie ; par2 = http://www.economagic.com/em-cgi/data.exe/frbg17/B50001_ipnsa ; par3 = een stijgende lijn ; 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')