Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*The author of this computation has been verified*

R Software Module

rwasp_pairs.wasp

Title produced by software

Kendall tau Correlation Matrix

Date of computation

Thu, 12 Nov 2009 09:49:55 -0700

Cite this page as follows

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2009/Nov/12/t1258044639ns082gqy36osqed.htm/, Retrieved Sat, 04 May 2024 03:01:38 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=56221, Retrieved Sat, 04 May 2024 03:01:38 +0000

QR Codes:

Paste this QR Code to cite your computation.

Original text written by user:

IsPrivate?

No (this computation is public)

User-defined keywords

Estimated Impact

147

Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)

-     [Kendall tau Correlation Matrix] [3/11/2009] [2009-11-02 21:25:00] [b98453cac15ba1066b407e146608df68]
-   PD    [Kendall tau Correlation Matrix] [Kendall tau Corre...] [2009-11-12 16:49:55] [371dc2189c569d90e2c1567f632c3ec0] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

11956,6	10519,2	149	462
10723,8	10414,9	139	455
13938,9	12476,8	135	461
13979,8	12384,6	130	461
13807,4	12266,7	127	463
12973,9	12919,9	122	462
12509,8	11497,3	117	456
12934,1	12142	112	455
14908,3	13919,4	113	456
13772,1	12656,8	149	472
13012,6	12034,1	157	472
14049,9	13199,7	157	471
11816,5	10881,3	147	465
11593,2	11301,2	137	459
14466,2	13643,9	132	465
13615,9	12517	125	468
14733,9	13981,1	123	467
13880,7	14275,7	117	463
13527,5	13435	114	460
13584	13565,7	111	462
16170,2	16216,3	112	461
13260,6	12970	144	476
14741,9	14079,9	150	476
15486,5	14235	149	471
13154,5	12213,4	134	453
12621,2	12581	123	443
15031,6	14130,4	116	442
15452,4	14210,8	117	444
15428	14378,5	111	438
13105,9	13142,8	105	427
14716,8	13714,7	102	424
14180	13621,9	95	416
16202,2	15379,8	93	406
14392,4	13306,3	124	431
15140,6	14391,2	130	434
15960,1	14909,9	124	418
14351,3	14025,4	115	412
13230,2	12951,2	106	404
15202,1	14344,3	105	409
17056	16093,4	105	412
16077,7	15413,6	101	406
13348,2	14705,7	95	398
16402,4	15972,8	93	397
16559,1	16241,4	84	385
16579	16626,4	87	390
17561,2	17136,2	116	413
16129,6	15622,9	120	413
18484,3	18003,9	117	401
16402,6	16136,1	109	397
14032,3	14423,7	105	397
17109,1	16789,4	107	409
17157,2	16782,2	109	419
13879,8	14133,8	109	424
12362,4	12607	108	428
12683,5	12004,5	107	430
12608,8	12175,4	99	424
13583,7	13268	103	433
12846,3	12299,3	131	456
12347,1	11800,6	137	459
13967	13873,3	135	446
13214,7	12315	124	441

Summary of computational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	2 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 & 2 seconds \tabularnewline
R Server & 'George Udny Yule' @ 72.249.76.132 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56221&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]2 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=56221&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56221&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 Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	2 seconds
R Server	'George Udny Yule' @ 72.249.76.132

Kendall tau rank correlations for all pairs of data series
pair	tau	p-value
tau( UE , IE )	0.789071038251366	0
tau( UE , WJ )	-0.246977633763610	0.00527094383172023
tau( UE , WO )	-0.306006731477744	0.000536361714452920
tau( IE , WJ )	-0.359440663423826	4.89815944029826e-05
tau( IE , WO )	-0.40067068438093	5.81911736093835e-06
tau( WJ , WO )	0.611327888657516	6.86228851520809e-12

\begin{tabular}{lllllllll}
\hline
Kendall tau rank correlations for all pairs of data series \tabularnewline
pair & tau & p-value \tabularnewline
tau( UE , IE ) & 0.789071038251366 & 0 \tabularnewline
tau( UE , WJ ) & -0.246977633763610 & 0.00527094383172023 \tabularnewline
tau( UE , WO ) & -0.306006731477744 & 0.000536361714452920 \tabularnewline
tau( IE , WJ ) & -0.359440663423826 & 4.89815944029826e-05 \tabularnewline
tau( IE , WO ) & -0.40067068438093 & 5.81911736093835e-06 \tabularnewline
tau( WJ , WO ) & 0.611327888657516 & 6.86228851520809e-12 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56221&T=1

[TABLE]
[ROW][C]Kendall tau rank correlations for all pairs of data series[/C][/ROW]
[ROW][C]pair[/C][C]tau[/C][C]p-value[/C][/ROW]
[ROW][C]tau( UE , IE )[/C][C]0.789071038251366[/C][C]0[/C][/ROW]
[ROW][C]tau( UE , WJ )[/C][C]-0.246977633763610[/C][C]0.00527094383172023[/C][/ROW]
[ROW][C]tau( UE , WO )[/C][C]-0.306006731477744[/C][C]0.000536361714452920[/C][/ROW]
[ROW][C]tau( IE , WJ )[/C][C]-0.359440663423826[/C][C]4.89815944029826e-05[/C][/ROW]
[ROW][C]tau( IE , WO )[/C][C]-0.40067068438093[/C][C]5.81911736093835e-06[/C][/ROW]
[ROW][C]tau( WJ , WO )[/C][C]0.611327888657516[/C][C]6.86228851520809e-12[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56221&T=1

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

As an alternative you can also use a QR Code:

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

Kendall tau rank correlations for all pairs of data series
pair	tau	p-value
tau( UE , IE )	0.789071038251366	0
tau( UE , WJ )	-0.246977633763610	0.00527094383172023
tau( UE , WO )	-0.306006731477744	0.000536361714452920
tau( IE , WJ )	-0.359440663423826	4.89815944029826e-05
tau( IE , WO )	-0.40067068438093	5.81911736093835e-06
tau( WJ , WO )	0.611327888657516	6.86228851520809e-12

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = red ; par2 = blue ; par3 = TRUE ; par4 = iptot ; par5 = ipkl ;

Parameters (R input):

R code (references can be found in the software module):

panel.tau <- function(x, y, digits=2, prefix='', cex.cor)
{
usr <- par('usr'); on.exit(par(usr))
par(usr = c(0, 1, 0, 1))
rr <- cor.test(x, y, method='kendall')
r <- round(rr$p.value,2)
txt <- format(c(r, 0.123456789), digits=digits)[1]
txt <- paste(prefix, txt, sep='')
if(missing(cex.cor)) cex <- 0.5/strwidth(txt)
text(0.5, 0.5, txt, cex = cex)
}
panel.hist <- function(x, ...)
{
usr <- par('usr'); on.exit(par(usr))
par(usr = c(usr[1:2], 0, 1.5) )
h <- hist(x, plot = FALSE)
breaks <- h$breaks; nB <- length(breaks)
y <- h$counts; y <- y/max(y)
rect(breaks[-nB], 0, breaks[-1], y, col='grey', ...)
}
bitmap(file='test1.png')
pairs(t(y),diag.panel=panel.hist, upper.panel=panel.smooth, lower.panel=panel.tau, main=main)
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Kendall tau rank correlations for all pairs of data series',3,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'pair',1,TRUE)
a<-table.element(a,'tau',1,TRUE)
a<-table.element(a,'p-value',1,TRUE)
a<-table.row.end(a)
n <- length(y[,1])
n
cor.test(y[1,],y[2,],method='kendall')
for (i in 1:(n-1))
{
for (j in (i+1):n)
{
a<-table.row.start(a)
dum <- paste('tau(',dimnames(t(x))[[2]][i])
dum <- paste(dum,',')
dum <- paste(dum,dimnames(t(x))[[2]][j])
dum <- paste(dum,')')
a<-table.element(a,dum,header=TRUE)
r <- cor.test(y[i,],y[j,],method='kendall')
a<-table.element(a,r$estimate)
a<-table.element(a,r$p.value)
a<-table.row.end(a)
}
}
a<-table.end(a)
table.save(a,file='mytable.tab')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code