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, 25 Nov 2010 16:39:51 +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/25/t12907030752jx9oka9sdk47jw.htm/, Retrieved Sat, 20 Apr 2024 08:25:02 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=101193, Retrieved Sat, 20 Apr 2024 08:25:02 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact116
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]
-  MPD    [Bivariate Data Series] [workshop 3 onderd...] [2010-11-25 16:39:51] [531024149246456e4f6d79ace2e85c12] [Current]
Feedback Forum

Post a new message
Dataseries X:
10788500
10708433
10625700
10547958
10478617
10421137
10376133
10332785
10286570
10251250
10226419
10203008
10181245
10156637
10136811
10115603
10084475
10045158
10004486
9967379
9937697
9901664
9870234
9861823
9858308
9855372
9855520
9856303
9858982
9859242
9848382
9839534
9830358
9818227
9800700
9772419
9741720
9711115
9673162
9655549
9646032
9618756
9580991
9527807
9463667
9378113
9289770
9220578
9183948
9153489
Dataseries Y:
8365275
8336926
8300788
8268641
8227829
8171966
8121423
8081957
8042293
8011566
7992324
7976789
7968041
7959017
7948278
7936118
7905633
7840709
7754891
7677850
7619567
7585317
7574586
7569794
7564985
7561434
7561910
7574140
7568710
7549433
7549425
7562305
7568430
7565525
7578903
7599038
7586115
7544201
7500482
7467086
7441055
7415403
7376998
7322066
7270889
7223801
7175811
7129864
7086299
7047539




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time1 seconds
R Server'Sir Ronald Aylmer Fisher' @ 193.190.124.24

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

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=101193&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'Sir Ronald Aylmer Fisher' @ 193.190.124.24







Bivariate Dataseries
Name of dataseries xBelgië
Source of x
Description of xbevolkingsaantal (1960 - 2009)
Name of dataseries yOostenrijk
Source of y
Description of ybevolkingsaantal (1960 - 2009)
Number of observations50

\begin{tabular}{lllllllll}
\hline
Bivariate Dataseries \tabularnewline
Name of dataseries x & België \tabularnewline
Source of x &  \tabularnewline
Description of x & bevolkingsaantal (1960 - 2009) \tabularnewline
Name of dataseries y & Oostenrijk \tabularnewline
Source of y &  \tabularnewline
Description of y & bevolkingsaantal (1960 - 2009) \tabularnewline
Number of observations & 50 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=101193&T=1

[TABLE]
[ROW][C]Bivariate Dataseries[/C][/ROW]
[ROW][C]Name of dataseries x[/C][C]België[/C][/ROW]
[ROW][C]Source of x[/C][C][/C][/ROW]
[ROW][C]Description of x[/C][C]bevolkingsaantal (1960 - 2009)[/C][/ROW]
[ROW][C]Name of dataseries y[/C][C]Oostenrijk[/C][/ROW]
[ROW][C]Source of y[/C][C][/C][/ROW]
[ROW][C]Description of y[/C][C]bevolkingsaantal (1960 - 2009)[/C][/ROW]
[ROW][C]Number of observations[/C][C]50[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=101193&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=101193&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 xBelgië
Source of x
Description of xbevolkingsaantal (1960 - 2009)
Name of dataseries yOostenrijk
Source of y
Description of ybevolkingsaantal (1960 - 2009)
Number of observations50



Parameters (Session):
par1 = België ; par3 = bevolkingsaantal (1960 - 2009) ; par4 = Oostenrijk ; par6 = bevolkingsaantal (1960 - 2009) ;
Parameters (R input):
par1 = België ; par2 = ; par3 = bevolkingsaantal (1960 - 2009) ; par4 = Oostenrijk ; par5 = ; par6 = bevolkingsaantal (1960 - 2009) ;
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')