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

Sun, 05 Dec 2010 10:37:33 +0000

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/2010/Dec/05/t1291545346n67z5bcrtdlns0q.htm/, Retrieved Wed, 01 May 2024 16:14:08 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=105326, Retrieved Wed, 01 May 2024 16:14:08 +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

166

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

-       [Kendall tau Correlation Matrix] [W9 correlatie 39 ...] [2010-12-05 10:37:33] [59f7d3e7fcb6374015f4e6b9053b0f01] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

1	6,60	6,3	2,0	4,5	42	3	1	3
2547	4603,00	2,1	1,8	69,0	624	3	5	4
10,550	179,50	9,1	0,7	27,0	180	4	4	4
0,023	0,30	15,8	3,9	19,0	35	1	1	1
160	169,00	5,2	1,0	30,4	392	4	5	4
3	25,60	10,9	3,6	28,0	63	1	2	1
52,160	440,00	8,3	1,4	50,0	230	1	1	1
0,425	6,40	11,0	1,5	7,0	112	5	4	4
465	423,00	3,2	0,7	30,0	281	5	5	5
0,075	1,20	6,3	2,1	3,5	42	1	1	1
0,785	3,50	6,6	4,1	6,0	42	2	2	2
0,2	5,00	9,5	1,2	10,4	120	2	2	2
27,660	115,00	3,3	0,5	20,0	148	5	5	5
0,12	1,00	11,0	3,4	3,9	16	3	1	2
85	325,00	4,7	1,5	41,0	310	1	3	1
0,101	4,00	10,4	3,4	9,0	28	5	1	3
1,040	5,50	7,4	0,8	7,6	68	5	3	4
521	655,00	2,1	0,8	46,0	336	5	5	5
0,1	0,25	17,9	2,0	24,0	50	1	1	1
62	1320,00	6,1	1,9	100,0	267	1	1	1
0,023	0,40	11,9	1,3	3,2	19	4	1	3
1,700	6,30	13,8	5,6	5,0	12	2	1	1
3,500	10,80	14,3	3,1	6,5	120	2	1	1
0,48	15,50	15,2	1,8	12,0	140	2	2	2
10	115,00	10,0	0,9	20,2	170	4	4	4
1,620	11,40	11,9	1,8	13,0	17	2	1	2
192	180,00	6,5	1,9	27,0	115	4	4	4
2,500	12,10	7,5	0,9	18,0	31	5	5	5
0,28	1,90	10,6	2,6	4,7	21	3	1	3
4,235	50,40	7,4	2,4	9,8	52	1	1	1
6,800	179,00	8,4	1,2	29,0	164	2	3	2
0,75	12,30	5,7	0,9	7,0	225	2	2	2
3,600	21,00	4,9	0,5	6,0	225	3	2	3
55,500	175,00	3,2	0,6	20,0	151	5	5	5
0,9	2,60	11,0	2,3	4,5	60	2	1	2
2	12,30	4,9	0,5	7,5	200	3	1	3
0,104	2,50	13,2	2,6	2,3	46	3	2	2
4,190	58,00	9,7	0,6	24,0	210	4	3	4
3,500	3,90	12,8	6,6	3,0	14	2	1	1

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

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

Kendall tau rank correlations for all pairs of data series
pair	tau	p-value
tau( Wb , Wbr )	0.783491204330176	2.44981812613787e-12
tau( Wb , SWS )	-0.473152875978914	2.51663950913214e-05
tau( Wb , PS )	-0.280454551912276	0.0129970013145375
tau( Wb , L )	0.533244839988371	1.96636736027322e-06
tau( Wb , Gt )	0.528814653108141	2.35353207189704e-06
tau( Wb , P )	0.157162384922336	0.192918475102725
tau( Wb , S )	0.481105538846395	8.894876128962e-05
tau( Wb , D )	0.270996149611182	0.0251748790172397
tau( Wbr , SWS )	-0.492187761794157	1.17162106272999e-05
tau( Wbr , PS )	-0.32423282343029	0.0040843236441198
tau( Wbr , L )	0.649934550520177	6.71946276398216e-09
tau( Wbr , Gt )	0.59932327352256	8.80445836237698e-08
tau( Wbr , P )	0.125729907937869	0.297599436727983
tau( Wbr , S )	0.490508252960657	6.45563916017444e-05
tau( Wbr , D )	0.269490615446675	0.0259960089790334
tau( SWS , PS )	0.416502813393936	0.000239461146343212
tau( SWS , L )	-0.299932460831074	0.0077136434162315
tau( SWS , Gt )	-0.485015424482789	1.62292409393720e-05
tau( SWS , P )	-0.242131819859344	0.04578541865735
tau( SWS , S )	-0.429864229125705	0.000489293307264879
tau( SWS , D )	-0.388767916620185	0.00138416629967602
tau( PS , L )	-0.237319423646220	0.0360175671807245
tau( PS , Gt )	-0.460607729446394	4.65776835010963e-05
tau( PS , P )	-0.391933283689038	0.00130312933373404
tau( PS , S )	-0.470556201336591	0.000147339656485132
tau( PS , D )	-0.526647206119485	1.64561987053777e-05
tau( L , Gt )	0.532970891338817	2.07465413826213e-06
tau( L , P )	-0.00600340790125048	0.960431420755444
tau( L , S )	0.410129528149785	0.000860623454862042
tau( L , D )	0.161529906832052	0.183149612517118
tau( Gt , P )	0.0749916014109366	0.535162671679509
tau( Gt , S )	0.461671030557569	0.000174148780832661
tau( Gt , D )	0.229307107012281	0.0586360191400337
tau( P , S )	0.521761736496419	8.43461700064108e-05
tau( P , D )	0.875951598062132	2.14877005078051e-11
tau( S , D )	0.659065889340351	7.34146722081164e-07

\begin{tabular}{lllllllll}
\hline
Kendall tau rank correlations for all pairs of data series \tabularnewline
pair & tau & p-value \tabularnewline
tau( Wb , Wbr ) & 0.783491204330176 & 2.44981812613787e-12 \tabularnewline
tau( Wb , SWS ) & -0.473152875978914 & 2.51663950913214e-05 \tabularnewline
tau( Wb , PS ) & -0.280454551912276 & 0.0129970013145375 \tabularnewline
tau( Wb , L ) & 0.533244839988371 & 1.96636736027322e-06 \tabularnewline
tau( Wb , Gt ) & 0.528814653108141 & 2.35353207189704e-06 \tabularnewline
tau( Wb , P ) & 0.157162384922336 & 0.192918475102725 \tabularnewline
tau( Wb , S ) & 0.481105538846395 & 8.894876128962e-05 \tabularnewline
tau( Wb , D ) & 0.270996149611182 & 0.0251748790172397 \tabularnewline
tau( Wbr , SWS ) & -0.492187761794157 & 1.17162106272999e-05 \tabularnewline
tau( Wbr , PS ) & -0.32423282343029 & 0.0040843236441198 \tabularnewline
tau( Wbr , L ) & 0.649934550520177 & 6.71946276398216e-09 \tabularnewline
tau( Wbr , Gt ) & 0.59932327352256 & 8.80445836237698e-08 \tabularnewline
tau( Wbr , P ) & 0.125729907937869 & 0.297599436727983 \tabularnewline
tau( Wbr , S ) & 0.490508252960657 & 6.45563916017444e-05 \tabularnewline
tau( Wbr , D ) & 0.269490615446675 & 0.0259960089790334 \tabularnewline
tau( SWS , PS ) & 0.416502813393936 & 0.000239461146343212 \tabularnewline
tau( SWS , L ) & -0.299932460831074 & 0.0077136434162315 \tabularnewline
tau( SWS , Gt ) & -0.485015424482789 & 1.62292409393720e-05 \tabularnewline
tau( SWS , P ) & -0.242131819859344 & 0.04578541865735 \tabularnewline
tau( SWS , S ) & -0.429864229125705 & 0.000489293307264879 \tabularnewline
tau( SWS , D ) & -0.388767916620185 & 0.00138416629967602 \tabularnewline
tau( PS , L ) & -0.237319423646220 & 0.0360175671807245 \tabularnewline
tau( PS , Gt ) & -0.460607729446394 & 4.65776835010963e-05 \tabularnewline
tau( PS , P ) & -0.391933283689038 & 0.00130312933373404 \tabularnewline
tau( PS , S ) & -0.470556201336591 & 0.000147339656485132 \tabularnewline
tau( PS , D ) & -0.526647206119485 & 1.64561987053777e-05 \tabularnewline
tau( L , Gt ) & 0.532970891338817 & 2.07465413826213e-06 \tabularnewline
tau( L , P ) & -0.00600340790125048 & 0.960431420755444 \tabularnewline
tau( L , S ) & 0.410129528149785 & 0.000860623454862042 \tabularnewline
tau( L , D ) & 0.161529906832052 & 0.183149612517118 \tabularnewline
tau( Gt , P ) & 0.0749916014109366 & 0.535162671679509 \tabularnewline
tau( Gt , S ) & 0.461671030557569 & 0.000174148780832661 \tabularnewline
tau( Gt , D ) & 0.229307107012281 & 0.0586360191400337 \tabularnewline
tau( P , S ) & 0.521761736496419 & 8.43461700064108e-05 \tabularnewline
tau( P , D ) & 0.875951598062132 & 2.14877005078051e-11 \tabularnewline
tau( S , D ) & 0.659065889340351 & 7.34146722081164e-07 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=105326&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( Wb , Wbr )[/C][C]0.783491204330176[/C][C]2.44981812613787e-12[/C][/ROW]
[ROW][C]tau( Wb , SWS )[/C][C]-0.473152875978914[/C][C]2.51663950913214e-05[/C][/ROW]
[ROW][C]tau( Wb , PS )[/C][C]-0.280454551912276[/C][C]0.0129970013145375[/C][/ROW]
[ROW][C]tau( Wb , L )[/C][C]0.533244839988371[/C][C]1.96636736027322e-06[/C][/ROW]
[ROW][C]tau( Wb , Gt )[/C][C]0.528814653108141[/C][C]2.35353207189704e-06[/C][/ROW]
[ROW][C]tau( Wb , P )[/C][C]0.157162384922336[/C][C]0.192918475102725[/C][/ROW]
[ROW][C]tau( Wb , S )[/C][C]0.481105538846395[/C][C]8.894876128962e-05[/C][/ROW]
[ROW][C]tau( Wb , D )[/C][C]0.270996149611182[/C][C]0.0251748790172397[/C][/ROW]
[ROW][C]tau( Wbr , SWS )[/C][C]-0.492187761794157[/C][C]1.17162106272999e-05[/C][/ROW]
[ROW][C]tau( Wbr , PS )[/C][C]-0.32423282343029[/C][C]0.0040843236441198[/C][/ROW]
[ROW][C]tau( Wbr , L )[/C][C]0.649934550520177[/C][C]6.71946276398216e-09[/C][/ROW]
[ROW][C]tau( Wbr , Gt )[/C][C]0.59932327352256[/C][C]8.80445836237698e-08[/C][/ROW]
[ROW][C]tau( Wbr , P )[/C][C]0.125729907937869[/C][C]0.297599436727983[/C][/ROW]
[ROW][C]tau( Wbr , S )[/C][C]0.490508252960657[/C][C]6.45563916017444e-05[/C][/ROW]
[ROW][C]tau( Wbr , D )[/C][C]0.269490615446675[/C][C]0.0259960089790334[/C][/ROW]
[ROW][C]tau( SWS , PS )[/C][C]0.416502813393936[/C][C]0.000239461146343212[/C][/ROW]
[ROW][C]tau( SWS , L )[/C][C]-0.299932460831074[/C][C]0.0077136434162315[/C][/ROW]
[ROW][C]tau( SWS , Gt )[/C][C]-0.485015424482789[/C][C]1.62292409393720e-05[/C][/ROW]
[ROW][C]tau( SWS , P )[/C][C]-0.242131819859344[/C][C]0.04578541865735[/C][/ROW]
[ROW][C]tau( SWS , S )[/C][C]-0.429864229125705[/C][C]0.000489293307264879[/C][/ROW]
[ROW][C]tau( SWS , D )[/C][C]-0.388767916620185[/C][C]0.00138416629967602[/C][/ROW]
[ROW][C]tau( PS , L )[/C][C]-0.237319423646220[/C][C]0.0360175671807245[/C][/ROW]
[ROW][C]tau( PS , Gt )[/C][C]-0.460607729446394[/C][C]4.65776835010963e-05[/C][/ROW]
[ROW][C]tau( PS , P )[/C][C]-0.391933283689038[/C][C]0.00130312933373404[/C][/ROW]
[ROW][C]tau( PS , S )[/C][C]-0.470556201336591[/C][C]0.000147339656485132[/C][/ROW]
[ROW][C]tau( PS , D )[/C][C]-0.526647206119485[/C][C]1.64561987053777e-05[/C][/ROW]
[ROW][C]tau( L , Gt )[/C][C]0.532970891338817[/C][C]2.07465413826213e-06[/C][/ROW]
[ROW][C]tau( L , P )[/C][C]-0.00600340790125048[/C][C]0.960431420755444[/C][/ROW]
[ROW][C]tau( L , S )[/C][C]0.410129528149785[/C][C]0.000860623454862042[/C][/ROW]
[ROW][C]tau( L , D )[/C][C]0.161529906832052[/C][C]0.183149612517118[/C][/ROW]
[ROW][C]tau( Gt , P )[/C][C]0.0749916014109366[/C][C]0.535162671679509[/C][/ROW]
[ROW][C]tau( Gt , S )[/C][C]0.461671030557569[/C][C]0.000174148780832661[/C][/ROW]
[ROW][C]tau( Gt , D )[/C][C]0.229307107012281[/C][C]0.0586360191400337[/C][/ROW]
[ROW][C]tau( P , S )[/C][C]0.521761736496419[/C][C]8.43461700064108e-05[/C][/ROW]
[ROW][C]tau( P , D )[/C][C]0.875951598062132[/C][C]2.14877005078051e-11[/C][/ROW]
[ROW][C]tau( S , D )[/C][C]0.659065889340351[/C][C]7.34146722081164e-07[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=105326&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=105326&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( Wb , Wbr )	0.783491204330176	2.44981812613787e-12
tau( Wb , SWS )	-0.473152875978914	2.51663950913214e-05
tau( Wb , PS )	-0.280454551912276	0.0129970013145375
tau( Wb , L )	0.533244839988371	1.96636736027322e-06
tau( Wb , Gt )	0.528814653108141	2.35353207189704e-06
tau( Wb , P )	0.157162384922336	0.192918475102725
tau( Wb , S )	0.481105538846395	8.894876128962e-05
tau( Wb , D )	0.270996149611182	0.0251748790172397
tau( Wbr , SWS )	-0.492187761794157	1.17162106272999e-05
tau( Wbr , PS )	-0.32423282343029	0.0040843236441198
tau( Wbr , L )	0.649934550520177	6.71946276398216e-09
tau( Wbr , Gt )	0.59932327352256	8.80445836237698e-08
tau( Wbr , P )	0.125729907937869	0.297599436727983
tau( Wbr , S )	0.490508252960657	6.45563916017444e-05
tau( Wbr , D )	0.269490615446675	0.0259960089790334
tau( SWS , PS )	0.416502813393936	0.000239461146343212
tau( SWS , L )	-0.299932460831074	0.0077136434162315
tau( SWS , Gt )	-0.485015424482789	1.62292409393720e-05
tau( SWS , P )	-0.242131819859344	0.04578541865735
tau( SWS , S )	-0.429864229125705	0.000489293307264879
tau( SWS , D )	-0.388767916620185	0.00138416629967602
tau( PS , L )	-0.237319423646220	0.0360175671807245
tau( PS , Gt )	-0.460607729446394	4.65776835010963e-05
tau( PS , P )	-0.391933283689038	0.00130312933373404
tau( PS , S )	-0.470556201336591	0.000147339656485132
tau( PS , D )	-0.526647206119485	1.64561987053777e-05
tau( L , Gt )	0.532970891338817	2.07465413826213e-06
tau( L , P )	-0.00600340790125048	0.960431420755444
tau( L , S )	0.410129528149785	0.000860623454862042
tau( L , D )	0.161529906832052	0.183149612517118
tau( Gt , P )	0.0749916014109366	0.535162671679509
tau( Gt , S )	0.461671030557569	0.000174148780832661
tau( Gt , D )	0.229307107012281	0.0586360191400337
tau( P , S )	0.521761736496419	8.43461700064108e-05
tau( P , D )	0.875951598062132	2.14877005078051e-11
tau( S , D )	0.659065889340351	7.34146722081164e-07

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

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