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 computationFri, 02 Oct 2015 13:58:34 +0100
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2015/Oct/02/t1443790805ngir16bwkedx0vy.htm/, Retrieved Tue, 14 May 2024 03:39:34 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=281092, Retrieved Tue, 14 May 2024 03:39:34 +0000
QR Codes:

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

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] [] [2015-10-02 12:58:34] [dce38ba7cc70e884f4588278752279c3] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
 516 922 
 507 561 
 492 622 
 490 243 
 469 357 
 477 580 
 528 379 
 533 590 
 517 945 
 506 174 
 501 866 
 516 141 
 528 222 
 532 638 
 536 322 
 536 535 
 523 597 
 536 214 
 586 570 
 596 594 
 580 523 
 564 478 
 557 560 
 575 093 
 580 112 
 574 761 
 563 250 
 551 531 
 537 034 
 544 686 
 600 991 
 604 378 
 586 111 
 563 668 
 548 604 
 551 174 
 555 654 
 547 970 
 540 324 
 530 577 
 520 579 
 518 654 
 572 273 
 581 302 
 563 280 
 547 612 
 538 712 
 540 735 
 561 649 
 558 685 
 545 732 
 536 352 
 527 676 
 530 455 
 581 744 
 598 714 
 583 775 
 571 477 
 563 278 
 564 872 
 577 537 
 572 399 
 565 430 
 560 619 
 551 227 
 553 397 
 610 893 
 621 668 
 613 148 
 598 778 
 590 623 
 595 902 
 612 186 
 603 453 
 593 362 
 581 940 
 568 075 
 567 467 
 619 423 
 627 325 
 617 144 
 602 280 
 590 816 
 589 812

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Herman Ole Andreas Wold' @ wold.wessa.net

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

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






Univariate Dataseries
Name of dataseriesWerkloosheidscijfers 2008-2014
SourceNBB
DescriptionDeze cijfers geven weer hoeveel werklozen er per maand in ons land waren tussen januari 2008 en december 2014.
Number of observations84

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Werkloosheidscijfers 2008-2014 \tabularnewline
Source & NBB \tabularnewline
Description & Deze cijfers geven weer hoeveel werklozen er per maand in ons land waren tussen januari 2008 en december 2014. \tabularnewline
Number of observations & 84 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=281092&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Werkloosheidscijfers 2008-2014[/C][/ROW]
[ROW][C]Source[/C][C]NBB[/C][/ROW]
[ROW][C]Description[/C][C]Deze cijfers geven weer hoeveel werklozen er per maand in ons land waren tussen januari 2008 en december 2014.[/C][/ROW]
[ROW][C]Number of observations[/C][C]84[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=281092&T=1

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

As an alternative you can also use a QR Code:  
QR Code


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

Univariate Dataseries
Name of dataseriesWerkloosheidscijfers 2008-2014
SourceNBB
DescriptionDeze cijfers geven weer hoeveel werklozen er per maand in ons land waren tussen januari 2008 en december 2014.
Number of observations84


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = Werkloosheidscijfers 2008-2014 ; par2 = NBB ; par3 = Deze cijfers geven weer hoeveel werklozen er per maand in ons land waren tussen januari 2008 en december 2014. ; par4 = 12 ;
Parameters (R input):
par1 = Werkloosheidscijfers 2008-2014 ; par2 = NBB ; par3 = Deze cijfers geven weer hoeveel werklozen er per maand in ons land waren tussen januari 2008 en december 2014. ; 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')