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 computationMon, 20 Oct 2008 09:29:00 -0600
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2008/Oct/20/t1224516689uf8lzwxwygbv89q.htm/, Retrieved Wed, 29 May 2024 06:42:24 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=17485, Retrieved Wed, 29 May 2024 06:42:24 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact145
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Univariate Data Series] [Investigating ass...] [2008-10-20 15:29:00] [4b953869c7238aca4b6e0cfb0c5cddd6] [Current]
Feedback Forum

Post a new message
Dataseries X:
110,40
96,40
101,90
106,20
81,00
94,70
101,00
109,40
102,30
90,70
96,20
96,10
106,00
103,10
102,00
104,70
86,00
92,10
106,90
112,60
101,70
92,00
97,40
97,00
105,40
102,70
98,10
104,50
87,40
89,90
109,80
111,70
98,60
96,90
95,10
97,00
112,70
102,90
97,40
111,40
87,40
96,80
114,10
110,30
103,90
101,60
94,60
95,90
104,70
102,80
98,10
113,90
80,90
95,70
113,20
105,90
108,80
102,30
99,00
100,70
115,50




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time3 seconds
R Server'Herman Ole Andreas Wold' @ 193.190.124.10:1001

\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 & 3 seconds \tabularnewline
R Server & 'Herman Ole Andreas Wold' @ 193.190.124.10:1001 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=17485&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]3 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Herman Ole Andreas Wold' @ 193.190.124.10:1001[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=17485&T=0

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







Univariate Dataseries
Name of dataseriesindustriele productie (indexcijfers) totale industrie (2000=100)
SourceOef. Investigating Associations
Descriptionindustriële productie (indexcijfers) totale industrie (2000=100)
Number of observations61

\begin{tabular}{lllllllll}
\hline
Univariate Dataseries \tabularnewline
Name of dataseries & industriele productie (indexcijfers) totale industrie (2000=100) \tabularnewline
Source & Oef. Investigating Associations \tabularnewline
Description & industriële productie (indexcijfers) totale industrie (2000=100) \tabularnewline
Number of observations & 61 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=17485&T=1

[TABLE]
[ROW][C]Univariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries[/C][C]industriele productie (indexcijfers) totale industrie (2000=100)[/C][/ROW]
[ROW][C]Source[/C][C]Oef. Investigating Associations[/C][/ROW]
[ROW][C]Description[/C][C]industriële productie (indexcijfers) totale industrie (2000=100)[/C][/ROW]
[ROW][C]Number of observations[/C][C]61[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=17485&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=17485&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 dataseriesindustriele productie (indexcijfers) totale industrie (2000=100)
SourceOef. Investigating Associations
Descriptionindustriële productie (indexcijfers) totale industrie (2000=100)
Number of observations61



Parameters (Session):
par1 = industriele productie (indexcijfers) totale industrie (2000=100) ; par2 = Oef. Investigating Associations ; par3 = industriële productie (indexcijfers) totale industrie (2000=100) ;
Parameters (R input):
par1 = industriele productie (indexcijfers) totale industrie (2000=100) ; par2 = Oef. Investigating Associations ; par3 = industriële productie (indexcijfers) totale industrie (2000=100) ;
R code (references can be found in the software module):
bitmap(file='test1.png')
plot(x,col=2,type='b',main=main,xlab=xlab,ylab=ylab)
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')