Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationThu, 07 Apr 2011 13:57:33 +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/Apr/07/t13021844314madosmihd1f057.htm/, Retrieved Thu, 09 May 2024 14:39:41 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=120392, Retrieved Thu, 09 May 2024 14:39:41 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywordsKDGP1W51
Estimated Impact200
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Central Tendency] [] [2011-04-06 18:12:54] [268ea95fef628aaa77b5f343b7444613]
- RM D  [Mean versus Median] [] [2011-04-06 18:39:23] [268ea95fef628aaa77b5f343b7444613]
- RMPD    [Univariate Data Series] [] [2011-04-06 18:57:28] [268ea95fef628aaa77b5f343b7444613]
- R P         [Univariate Data Series] [] [2011-04-07 13:57:33] [d41d8cd98f00b204e9800998ecf8427e] [Current]
-    D          [Univariate Data Series] [] [2011-04-07 14:00:08] [74be16979710d4c4e7c6647856088456]
Feedback Forum

Post a new message
Dataseries X:
10698
11514
13253
13807
13971
15548
17351
17409
17537
17704
17970
18004
18089
18479
18730
19169
19684
19785
20366
20506
20764
21382
21705
21725
21790
22205
22228
22397
22405
22414
22679
22780
22782
23843
23970
24319
24561
24693
25316
25591
25814
26105
26482
26887
27044
27071
27192
28029
28352
28806
29096
29133
29383
29462
29743
29965
30212
30364
31514
32034
32609
34777
35022
35338
35953
36438
36845
37702
37863
39690
41086
43129




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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=120392&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 time1 seconds
R Server'Gwilym Jenkins' @ www.wessa.org







Univariate Dataseries
Name of dataseriesInschrijvingen nieuwe wagens
SourceExcel
DescriptionInschrijvingen nieuwe wagens
Number of observations72

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Inschrijvingen nieuwe wagens \tabularnewline
Source & Excel \tabularnewline
Description & Inschrijvingen nieuwe wagens \tabularnewline
Number of observations & 72 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=120392&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Inschrijvingen nieuwe wagens[/C][/ROW]
[ROW][C]Source[/C][C]Excel[/C][/ROW]
[ROW][C]Description[/C][C]Inschrijvingen nieuwe wagens[/C][/ROW]
[ROW][C]Number of observations[/C][C]72[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=120392&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=120392&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 dataseriesInschrijvingen nieuwe wagens
SourceExcel
DescriptionInschrijvingen nieuwe wagens
Number of observations72



Parameters (Session):
par1 = Inschrijvingen nieuwe wagens ; par2 = Excel ; par3 = Inschrijvingen nieuwe wagens ; par4 = 12 ;
Parameters (R input):
par1 = Inschrijvingen nieuwe wagens ; par2 = Excel ; par3 = Inschrijvingen nieuwe wagens ; 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')