Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_bidataseries.wasp
Title produced by softwareBivariate Data Series
Date of computationThu, 11 Nov 2010 16:28:22 +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/Nov/11/t1289492841dx2lqlyjmf8m4sy.htm/, Retrieved Thu, 25 Apr 2024 06:10:50 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=93557, Retrieved Thu, 25 Apr 2024 06:10:50 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact154
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-     [Bivariate Data Series] [Bivariate dataset] [2008-01-05 23:51:08] [74be16979710d4c4e7c6647856088456]
- RMPD    [Bivariate Data Series] [WS6 - Mini Tutori...] [2010-11-11 16:28:22] [ee4a783fb13f41eb2e9bc8a0c4f26279] [Current]
Feedback Forum

Post a new message
Dataseries X:
2,4
2,4
2,5
2,6
2,4
2,6
2,4
2,3
2,4
2,4
2,4
2,4
2,4
2,4
2,4
2,4
2,5
2,1
2,1
2
2
2
1,9
1,9
2
1,8
1,6
1,3
1,4
1,4
1,5
1,7
1,6
1,5
1,6
1,5
1,1
1,1
1,1
1,4
1,3
1,4
1,3
1,1
1
0,9
0,8
0,8
0,8
0,8
1
1,1
1
0,9
1,1
1,2
1,2
1,4
1,5
1,7
1,9
1,9
1,9
1,7
1,7
2,1
2
2
2,5
2,4
2,5
2,5
2
1,9
2,2
2,7
3,1
2,8
2,6
2,3
2,2
2,2
2
2
2,6
2,5
2,5
2,3
2
1,9
2
2,1
2,1
2,3
2,3
2,3
2,1
2,4
2,5
2,1
1,8
1,9
1,9
2,1
2,2
2
2,2
2
1,9
1,6
1,7
2
2,5
2,4
2,3
2,3
2,1
2,4
2,2
2,4
1,9
2,1
2,1
2,1
2
2,1
2,2
2,2
2,6
2,5
2,3
2,2
2,4
2,3
2,2
2,5
2,5
2,5
2,4
2,3
1,7
1,6
1,9
1,9
1,8
1,8
1,9
1,9
1,9
1,9
1,8
1,7
2,1
2,6
3,1
3,1
3,2
3,3
3,6
3,3
3,7
4
4
3,8
3,6
3,2
2,1
1,6
1,1
1,2
0,6
0,6
0
-0,1
-0,6
-0,2
-0,3
-0,1
0,5
0,9
Dataseries Y:
10,47
10,44
10,41
10,37
10,38
10,38
10,37
10,41
10,44
10,43
10,47
10,49
10,53
10,63
10,66
10,66
10,64
10,65
10,61
10,6
10,61
10,63
10,63
10,61
10,7
10,69
10,62
10,62
10,63
10,62
10,53
10,51
10,5
10,52
10,47
10,43
10,35
10,31
10,25
10,26
10,2
10,13
10,06
10,01
9,95
9,92
9,87
9,83
9,7
9,63
9,56
9,53
9,47
9,4
9,32
9,26
9,19
9,1
9,03
8,95
8,85
8,78
8,71
8,61
8,54
8,49
8,42
8,36
8,3
8,19
8,15
8,1
8,04
8,05
8,04
8
8,02
8
8
8,01
8,04
8,1
8,14
8,17
8,17
8,22
8,21
8,29
8,37
8,43
8,47
8,51
8,55
8,59
8,66
8,71
8,78
8,81
8,84
8,81
8,82
8,84
8,83
8,83
8,88
8,88
8,89
8,93
8,95
8,92
8,97
8,99
9,01
8,99
9,03
9,04
9,07
9,04
9,07
9,09
9,04
9,08
9,13
9,09
9,05
9,06
8,99
8,98
8,99
8,94
8,87
8,83
8,8
8,79
8,71
8,6
8,5
8,38
8,26
8,23
8,17
8,1
8,02
7,9
7,82
7,72
7,63
7,53
7,56
7,49
7,53
7,47
7,39
7,37
7,34
7,39
7,32
7,24
7,18
7,31
7,39
7,48
7,51
7,61
7,69
7,86
8,05
8,24
8,55
8,81
9,13
9,24
9,36
9,48
9,61
9,7
9,82
9,86
9,87
9,87




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' @ 72.249.76.132

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

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







Bivariate Dataseries
Name of dataseries xInflation
Source of xECB
Description of x
Name of dataseries yUnemployment rate
Source of yECB
Description of y
Number of observations180

\begin{tabular}{lllllllll}
\hline
Bivariate Dataseries \tabularnewline
Name of dataseries x & Inflation \tabularnewline
Source of x & ECB \tabularnewline
Description of x &  \tabularnewline
Name of dataseries y & Unemployment rate \tabularnewline
Source of y & ECB \tabularnewline
Description of y &  \tabularnewline
Number of observations & 180 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=93557&T=1

[TABLE]
[ROW][C]Bivariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries x[/C][C]Inflation[/C][/ROW]
[ROW][C]Source of x[/C][C]ECB[/C][/ROW]
[ROW][C]Description of x[/C][C][/C][/ROW]
[ROW][C]Name of dataseries y[/C][C]Unemployment rate[/C][/ROW]
[ROW][C]Source of y[/C][C]ECB[/C][/ROW]
[ROW][C]Description of y[/C][C][/C][/ROW]
[ROW][C]Number of observations[/C][C]180[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=93557&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=93557&T=1

As an alternative you can also use a QR Code:  

The GUIDs for individual cells are displayed in the table below:

Bivariate Dataseries
Name of dataseries xInflation
Source of xECB
Description of x
Name of dataseries yUnemployment rate
Source of yECB
Description of y
Number of observations180



Parameters (Session):
par1 = Inflation ; par2 = ECB ; par4 = Unemployment rate ; par5 = ECB ;
Parameters (R input):
par1 = Inflation ; par2 = ECB ; par3 = ; par4 = Unemployment rate ; par5 = ECB ; par6 = ;
R code (references can be found in the software module):
bitmap(file='test1.png')
op <- par(mfrow=c(2,2))
plot(x,type='b',main='Plot of x',xlab=xlab,ylab=ylab)
plot(y,type='b',main='Plot of y',xlab=xlab,ylab=ylab)
hist(x)
hist(y)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Bivariate Dataseries',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Name of dataseries x',header=TRUE)
a<-table.element(a,par1)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Source of x',header=TRUE)
a<-table.element(a,par2)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Description of x',header=TRUE)
a<-table.element(a,par3)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Name of dataseries y',header=TRUE)
a<-table.element(a,par4)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Source of y',header=TRUE)
a<-table.element(a,par5)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Description of y',header=TRUE)
a<-table.element(a,par6)
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')