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, 10 Aug 2016 16:42:25 +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/2016/Aug/10/t1470843859ev8adbzbtcuuk8x.htm/, Retrieved Tue, 30 Apr 2024 06:22:28 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=296213, Retrieved Tue, 30 Apr 2024 06:22:28 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact107
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Univariate Data Series] [aantal bezoekers ...] [2016-08-10 15:42:25] [d7adcc7732e5b057da1b42af54844e1a] [Current]
Feedback Forum

Post a new message
Dataseries X:
77
85
85
78
89
87
80
83
88
86
81
94
79
85
83
81
90
85
83
89
94
80
82
91
80
86
87
87
91
88
77
79
99
78
88
91
76
81
88
88
91
91
79
79
97
77
86
93
74
74
88
86
94
88
81
75
100
76
86
91
79
71
87
86
98
83
76
74
99
72
83
89
79
65
91
85
94
78
79
76
105
76
84
93
79
65
91
82
94
73
81
77
105
74
82
93
83
66
86
83
93
72
78
79
105
72
82
92




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time0 seconds
R Server'George Udny Yule' @ yule.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 & 0 seconds \tabularnewline
R Server & 'George Udny Yule' @ yule.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=296213&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]'George Udny Yule' @ yule.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=296213&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=296213&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 Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time0 seconds
R Server'George Udny Yule' @ yule.wessa.net







Univariate Dataseries
Name of dataseriesaantal bezoekers van gallerij de zwarte panter
Sourceniet gekend
Descriptionaantal bezoekers per maand van gallerij de zwarte panter van 2007 tot 2015
Number of observations108

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & aantal bezoekers van gallerij de zwarte panter \tabularnewline
Source & niet gekend \tabularnewline
Description & aantal bezoekers per maand van gallerij de zwarte panter van 2007 tot 2015 \tabularnewline
Number of observations & 108 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=296213&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]aantal bezoekers van gallerij de zwarte panter[/C][/ROW]
[ROW][C]Source[/C][C]niet gekend[/C][/ROW]
[ROW][C]Description[/C][C]aantal bezoekers per maand van gallerij de zwarte panter van 2007 tot 2015[/C][/ROW]
[ROW][C]Number of observations[/C][C]108[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=296213&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=296213&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 dataseriesaantal bezoekers van gallerij de zwarte panter
Sourceniet gekend
Descriptionaantal bezoekers per maand van gallerij de zwarte panter van 2007 tot 2015
Number of observations108



Parameters (Session):
par1 = aantal bezoekers van gallerij de zwarte panter ; par2 = niet gekend ; par3 = aantal bezoekers per maand van gallerij de zwarte panter van 2007 tot 2015 ; par4 = 12 ;
Parameters (R input):
par1 = aantal bezoekers van gallerij de zwarte panter ; par2 = niet gekend ; par3 = aantal bezoekers per maand van gallerij de zwarte panter van 2007 tot 2015 ; 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')