FreeStatistics.org

Free Statistics

of Irreproducible Research!

Description of Statistical Computation

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_pairs.wasp
Title produced by softwareKendall tau Correlation Matrix
Date of computationSun, 05 Dec 2010 10:13:53 +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/Dec/05/t1291543938ki146et65r9ftc0.htm/, Retrieved Wed, 01 May 2024 20:24:53 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=105303, Retrieved Wed, 01 May 2024 20:24:53 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact146

Tree of Dependent Computations

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:13:53] [59f7d3e7fcb6374015f4e6b9053b0f01] [Current]
Feedback Forum

Post a new message

Dataset

Dataseries X:
Download CSV
Histogram
Boxplots 
1	6,60	6.3	2.0	4.5	42.0	3	1	3
2.547	4603,00	2.1	1.8	69.0	624.0	3	5	4
10,550	179,50	9.1	.7	27.0	180.0	4	4	4
0,023	0,30	15.8	3.9	19.0	35.0	1	1	1
160	169,00	5.2	1.0	30.4	392.0	4	5	4
3	25,60	10.9	3.6	28.0	63.0	1	2	1
52,160	440,00	8.3	1.4	50.0	230.0	1	1	1
0,425	6,40	11.0	1.5	7.0	112.0	5	4	4
465	423,00	3.2	.7	30.0	281.0	5	5	5
0,075	1,20	6.3	2.1	3.5	42.0	1	1	1
0,785	3,50	6.6	4.1	6.0	42.0	2	2	2
0,2	5,00	9.5	1.2	10.4	120.0	2	2	2
27,660	115,00	3.3	.5	20.0	148.0	5	5	5
0,12	1,00	11.0	3.4	3.9	16.0	3	1	2
85	325,00	4.7	1.5	41.0	310.0	1	3	1
0,101	4,00	10.4	3.4	9.0	28.0	5	1	3
1,040	5,50	7.4	.8	7.6	68.0	5	3	4
521	655,00	2.1	.8	46.0	336.0	5	5	5
0,1	0,25	17.9	2.0	24.0	50.0	1	1	1
62	1320,00	6.1	1.9	100.0	267.0	1	1	1
0,023	0,40	11.9	1.3	3.2	19.0	4	1	3
1,700	6,30	13.8	5.6	5.0	12.0	2	1	1
3,500	10,80	14.3	3.1	6.5	120.0	2	1	1
0,48	15,50	15.2	1.8	12.0	140.0	2	2	2
10	115,00	10.0	.9	20.2	170.0	4	4	4
1,620	11,40	11.9	1.8	13.0	17.0	2	1	2
192	180,00	6.5	1.9	27.0	115.0	4	4	4
2,500	12,10	7.5	.9	18.0	31.0	5	5	5
0,28	1,90	10.6	2.6	4.7	21.0	3	1	3
4,235	50,40	7.4	2.4	9.8	52.0	1	1	1
6,800	179,00	8.4	1.2	29.0	164.0	2	3	2
0,75	12,30	5.7	.9	7.0	225.0	2	2	2
3,600	21,00	4.9	.5	6.0	225.0	3	2	3
55,500	175,00	3.2	.6	20.0	151.0	5	5	5
0,9	2,60	11.0	2.3	4.5	60.0	2	1	2
2	12,30	4.9	.5	7.5	200.0	3	1	3
0,104	2,50	13.2	2.6	2.3	46.0	3	2	2
4,190	58,00	9.7	.6	24.0	210.0	4	3	4
3,500	3,90	12.8	6.6	3.0	14.0	2	1	1

Tables (Output of Computation)





Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 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=105303&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=105303&T=0

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

As an alternative you can also use a QR Code:  
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 time2 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135






Kendall tau rank correlations for all pairs of data series
pairtaup-value
tau( Wb , Wbr )0.7347767253044655.01390040597016e-11
tau( Wb , SWS )-0.4269252961418930.000143731175262218
tau( Wb , PS )-0.2968714037315310.00855740216950834
tau( Wb , L )0.4898254128137451.245175415443e-05
tau( Wb , Gt )0.4800009928212361.82991852288872e-05
tau( Wb , P )0.1601559541589520.18457691149236
tau( Wb , S )0.4403604443512610.000334479697282175
tau( Wb , D )0.2559408079661160.0344865837693684
tau( Wbr , SWS )-0.4921877617941571.17162106272999e-05
tau( Wbr , PS )-0.324232823430290.0040843236441198
tau( Wbr , L )0.6499345505201776.71946276398216e-09
tau( Wbr , Gt )0.599323273522568.80445836237698e-08
tau( Wbr , P )0.1257299079378690.297599436727983
tau( Wbr , S )0.4905082529606576.45563916017444e-05
tau( Wbr , D )0.2694906154466750.0259960089790334
tau( SWS , PS )0.4165028133939360.000239461146343212
tau( SWS , L )-0.2999324608310740.0077136434162315
tau( SWS , Gt )-0.4850154244827891.62292409393720e-05
tau( SWS , P )-0.2421318198593440.04578541865735
tau( SWS , S )-0.4298642291257050.000489293307264879
tau( SWS , D )-0.3887679166201850.00138416629967602
tau( PS , L )-0.2373194236462200.0360175671807245
tau( PS , Gt )-0.4606077294463944.65776835010963e-05
tau( PS , P )-0.3919332836890380.00130312933373404
tau( PS , S )-0.4705562013365910.000147339656485132
tau( PS , D )-0.5266472061194851.64561987053777e-05
tau( L , Gt )0.5329708913388172.07465413826213e-06
tau( L , P )-0.006003407901250480.960431420755444
tau( L , S )0.4101295281497850.000860623454862042
tau( L , D )0.1615299068320520.183149612517118
tau( Gt , P )0.07499160141093660.535162671679509
tau( Gt , S )0.4616710305575690.000174148780832661
tau( Gt , D )0.2293071070122810.0586360191400337
tau( P , S )0.5217617364964198.43461700064108e-05
tau( P , D )0.8759515980621322.14877005078051e-11
tau( S , D )0.6590658893403517.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.734776725304465 & 5.01390040597016e-11 \tabularnewline
tau( Wb , SWS ) & -0.426925296141893 & 0.000143731175262218 \tabularnewline
tau( Wb , PS ) & -0.296871403731531 & 0.00855740216950834 \tabularnewline
tau( Wb , L ) & 0.489825412813745 & 1.245175415443e-05 \tabularnewline
tau( Wb , Gt ) & 0.480000992821236 & 1.82991852288872e-05 \tabularnewline
tau( Wb , P ) & 0.160155954158952 & 0.18457691149236 \tabularnewline
tau( Wb , S ) & 0.440360444351261 & 0.000334479697282175 \tabularnewline
tau( Wb , D ) & 0.255940807966116 & 0.0344865837693684 \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=105303&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.734776725304465[/C][C]5.01390040597016e-11[/C][/ROW]
[ROW][C]tau( Wb , SWS )[/C][C]-0.426925296141893[/C][C]0.000143731175262218[/C][/ROW]
[ROW][C]tau( Wb , PS )[/C][C]-0.296871403731531[/C][C]0.00855740216950834[/C][/ROW]
[ROW][C]tau( Wb , L )[/C][C]0.489825412813745[/C][C]1.245175415443e-05[/C][/ROW]
[ROW][C]tau( Wb , Gt )[/C][C]0.480000992821236[/C][C]1.82991852288872e-05[/C][/ROW]
[ROW][C]tau( Wb , P )[/C][C]0.160155954158952[/C][C]0.18457691149236[/C][/ROW]
[ROW][C]tau( Wb , S )[/C][C]0.440360444351261[/C][C]0.000334479697282175[/C][/ROW]
[ROW][C]tau( Wb , D )[/C][C]0.255940807966116[/C][C]0.0344865837693684[/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=105303&T=1

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

As an alternative you can also use a QR Code:  
QR Code


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

Kendall tau rank correlations for all pairs of data series
pairtaup-value
tau( Wb , Wbr )0.7347767253044655.01390040597016e-11
tau( Wb , SWS )-0.4269252961418930.000143731175262218
tau( Wb , PS )-0.2968714037315310.00855740216950834
tau( Wb , L )0.4898254128137451.245175415443e-05
tau( Wb , Gt )0.4800009928212361.82991852288872e-05
tau( Wb , P )0.1601559541589520.18457691149236
tau( Wb , S )0.4403604443512610.000334479697282175
tau( Wb , D )0.2559408079661160.0344865837693684
tau( Wbr , SWS )-0.4921877617941571.17162106272999e-05
tau( Wbr , PS )-0.324232823430290.0040843236441198
tau( Wbr , L )0.6499345505201776.71946276398216e-09
tau( Wbr , Gt )0.599323273522568.80445836237698e-08
tau( Wbr , P )0.1257299079378690.297599436727983
tau( Wbr , S )0.4905082529606576.45563916017444e-05
tau( Wbr , D )0.2694906154466750.0259960089790334
tau( SWS , PS )0.4165028133939360.000239461146343212
tau( SWS , L )-0.2999324608310740.0077136434162315
tau( SWS , Gt )-0.4850154244827891.62292409393720e-05
tau( SWS , P )-0.2421318198593440.04578541865735
tau( SWS , S )-0.4298642291257050.000489293307264879
tau( SWS , D )-0.3887679166201850.00138416629967602
tau( PS , L )-0.2373194236462200.0360175671807245
tau( PS , Gt )-0.4606077294463944.65776835010963e-05
tau( PS , P )-0.3919332836890380.00130312933373404
tau( PS , S )-0.4705562013365910.000147339656485132
tau( PS , D )-0.5266472061194851.64561987053777e-05
tau( L , Gt )0.5329708913388172.07465413826213e-06
tau( L , P )-0.006003407901250480.960431420755444
tau( L , S )0.4101295281497850.000860623454862042
tau( L , D )0.1615299068320520.183149612517118
tau( Gt , P )0.07499160141093660.535162671679509
tau( Gt , S )0.4616710305575690.000174148780832661
tau( Gt , D )0.2293071070122810.0586360191400337
tau( P , S )0.5217617364964198.43461700064108e-05
tau( P , D )0.8759515980621322.14877005078051e-11
tau( S , D )0.6590658893403517.34146722081164e-07


Figures (Output of Computation)

Input Parameters & R Code

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')