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 computationTue, 03 Aug 2010 11:30:49 +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/2010/Aug/03/t1280835345meg4pqx6iil17we.htm/, Retrieved Thu, 02 May 2024 18:30:05 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=78233, Retrieved Thu, 02 May 2024 18:30:05 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywordsCols Julien
Estimated Impact135

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] [Tijdreeks 1-Stap 2] [2010-08-03 11:30:49] [de7054811a4039cd82332eb5d7e753fd] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
356
355
354
352
372
371
356
346
347
347
348
350
353
351
348
351
370
370
351
335
330
328
332
334
343
334
336
343
365
364
351
326
320
312
315
316
319
311
315
322
336
339
317
295
291
283
285
289
296
283
285
289
306
306
283
258
255
248
244
249
258
252
246
249
267
284
261
235
229
218
218
229
237
231
229
233
245
256
224
194
192
178
170
187
192
182
178
186
204
224
194
173
178
168
152
163
172
170
156
155
178
194
164
135
139
135
109
121
131
135
119
121
151
169
135
105
112
105
82
81

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'RServer@AstonUniversity' @ vre.aston.ac.uk

\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 & 'RServer@AstonUniversity' @ vre.aston.ac.uk \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=78233&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]'RServer@AstonUniversity' @ vre.aston.ac.uk[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=78233&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=78233&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'RServer@AstonUniversity' @ vre.aston.ac.uk






Univariate Dataseries
Name of dataseriesaantal bezoekers per maand
Source"niet bekend"
Descriptiondeze reeks geeft het aantal bezoekers per maand weer
Number of observations120

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & aantal bezoekers per maand \tabularnewline
Source & "niet bekend" \tabularnewline
Description & deze reeks geeft het aantal bezoekers per maand weer \tabularnewline
Number of observations & 120 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=78233&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]aantal bezoekers per maand[/C][/ROW]
[ROW][C]Source[/C][C]"niet bekend"[/C][/ROW]
[ROW][C]Description[/C][C]deze reeks geeft het aantal bezoekers per maand weer[/C][/ROW]
[ROW][C]Number of observations[/C][C]120[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=78233&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=78233&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 dataseriesaantal bezoekers per maand
Source"niet bekend"
Descriptiondeze reeks geeft het aantal bezoekers per maand weer
Number of observations120


Figures (Output of Computation)

Input Parameters & R Code

Parameters (Session):
par1 = aantal bezoekers per maand ; par2 = "niet bekend" ; par3 = deze reeks geeft het aantal bezoekers per maand weer ; par4 = 12 ;
Parameters (R input):
par1 = aantal bezoekers per maand ; par2 = "niet bekend" ; par3 = deze reeks geeft het aantal bezoekers per maand weer ; 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')