Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_univariatedataseries.wasp
Title produced by softwareUnivariate Data Series
Date of computationWed, 22 Dec 2010 08:15:17 +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/Dec/22/t129300561823i9l6w3gr83m87.htm/, Retrieved Sat, 27 Apr 2024 15:44:24 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=114070, Retrieved Sat, 27 Apr 2024 15:44:24 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact168
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Univariate Explorative Data Analysis] [Run Sequence gebo...] [2008-12-12 13:32:37] [76963dc1903f0f612b6153510a3818cf]
- R  D  [Univariate Explorative Data Analysis] [Run Sequence gebo...] [2008-12-17 12:14:40] [76963dc1903f0f612b6153510a3818cf]
-         [Univariate Explorative Data Analysis] [Run Sequence Plot...] [2008-12-22 18:19:51] [1ce0d16c8f4225c977b42c8fa93bc163]
- RMP       [Univariate Data Series] [Identifying Integ...] [2009-11-22 12:08:06] [b98453cac15ba1066b407e146608df68]
-   PD        [Univariate Data Series] [WS 8, maandelijks...] [2010-11-28 09:47:18] [d946de7cca328fbcf207448a112523ab]
-   PD          [Univariate Data Series] [WS 8, maandelijks...] [2010-11-28 12:21:51] [d946de7cca328fbcf207448a112523ab]
-   PD            [Univariate Data Series] [Workshop 8, maand...] [2010-11-28 19:48:13] [d946de7cca328fbcf207448a112523ab]
- R PD              [Univariate Data Series] [Paper Inschrijvin...] [2010-12-18 14:20:05] [3635fb7041b1998c5a1332cf9de22bce]
-   PD                  [Univariate Data Series] [Aantal inschrijvi...] [2010-12-22 08:15:17] [4d0f7ea43b071af5c75b527ee1ef14c2] [Current]
Feedback Forum

Post a new message
Dataseries X:
130678
120877
137114
134406
120262
130846
120343
98881
115678
120796
94261
89151
119880
131468
155089
149581
122788
143900
112115
109600
117446
118456
101901
89940
129143
126102
143048
142258
131011
146471
114073
114642
118226
111338
108701
80512
146865
137179
166536
137070
127090
139966
122243
109097
116591
111964
109754
77609
138445
127901
156615
133264
143521
152139
131523
113925
86495
127877
107017
78716
138278
144238
143679
159932
136781
148173
125673
105573
122405
128045
94467
85573
121501
125074
144979
142120
124213
144407
125170
109267
122354
122589
104982
90542




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=114070&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' @ 72.249.127.135







Univariate Dataseries
Name of dataseriesInschrijvingen nieuwe en tweedehands voertuigen
Sourcehttp://www.mobilit.fgov.be/nl/index.htm
DescriptionInschrijvingen wagens voor de periode 2003-2009
Number of observations84

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & Inschrijvingen nieuwe en tweedehands voertuigen \tabularnewline
Source & http://www.mobilit.fgov.be/nl/index.htm \tabularnewline
Description & Inschrijvingen wagens voor de periode 2003-2009 \tabularnewline
Number of observations & 84 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=114070&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]Inschrijvingen nieuwe en tweedehands voertuigen[/C][/ROW]
[ROW][C]Source[/C][C]http://www.mobilit.fgov.be/nl/index.htm[/C][/ROW]
[ROW][C]Description[/C][C]Inschrijvingen wagens voor de periode 2003-2009[/C][/ROW]
[ROW][C]Number of observations[/C][C]84[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=114070&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=114070&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 en tweedehands voertuigen
Sourcehttp://www.mobilit.fgov.be/nl/index.htm
DescriptionInschrijvingen wagens voor de periode 2003-2009
Number of observations84



Parameters (Session):
par1 = Inschrijvingen nieuwe en tweedehands voertuigen ; par2 = http://www.mobilit.fgov.be/nl/index.htm ; par3 = Inschrijvingen wagens voor de periode 2003-2009 ; par4 = 12 ;
Parameters (R input):
par1 = Inschrijvingen nieuwe en tweedehands voertuigen ; par2 = http://www.mobilit.fgov.be/nl/index.htm ; par3 = Inschrijvingen wagens voor de periode 2003-2009 ; 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')