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

Fri, 13 Nov 2009 07:36:50 -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/13/t1258123076ohgqkfz57zai74i.htm/, Retrieved Sun, 05 May 2024 11:35:23 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=56715, Retrieved Sun, 05 May 2024 11:35:23 +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

100

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]
- R  D    [Kendall tau Correlation Matrix] [Kendel tau correl...] [2009-11-13 14:36:50] [d1856923bab8a0db5ebd860815c7444f] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

3.68	2.97	2.67	1.74
3.72	3.04	2.72	1.75
3.77	3.12	2.84	1.83
3.92	3.21	3	2.09
4.12	3.34	3.08	2.12
4.03	3.45	3.21	2.29
3.93	3.74	3.44	2.4
4.03	4.02	3.74	2.82
4.24	4.24	4.08	3.18
4.13	4.87	4.79	4
3.87	5.62	5.44	4.8
4.26	6.02	6.02	5.28
4.46	5.98	6.01	5.37
4.56	5.89	5.85	5.27
4.58	5.76	5.93	5.33
4.85	5.58	5.85	5.23
4.84	5.39	5.74	5.08
4.51	5.19	5.75	5.11
4.37	5.16	5.78	5.1
4.23	5.2	5.62	4.97
4.23	5.25	5.67	5
4.25	5.26	5.89	5.2
4.41	5.21	5.67	4.9
4.28	5.18	5.64	4.82
4.42	5.13	5.64	5.04
4.39	5.03	5.64	4.82
4.44	5.01	5.54	4.77
4.62	4.87	5.52	4.79
4.64	4.86	5.28	4.58
4.34	4.82	5.25	4.59
4.22	4.69	5.23	4.57
4.01	4.65	5.09	4.35
4.11	4.61	5	4.27
4.06	4.47	5.02	4.39
3.82	4.37	4.8	3.97
3.76	4.29	4.71	3.84
3.83	4.2	4.51	3.73
3.79	4.19	4.51	3.58
3.92	4.09	4.42	3.45
4.04	3.88	4.4	3.44
4.02	3.87	4.25	3.25
4.03	3.74	4.18	3.25
3.96	3.61	4.09	3.02
3.7	3.43	3.97	2.87
3.54	3.29	3.89	2.92
3.37	3.18	4.02	2.95
3.39	3.07	3.81	2.75
3.49	3.02	3.67	2.7
3.3	2.97	3.68	2.75
3.14	2.98	3.66	2.72
3.31	3.01	3.66	2.71
3.3	3.06	3.65	2.76
3.26	3.12	3.67	2.68
3.43	3.16	3.66	2.78
3.6	3.19	3.7	2.86
3.76	3.21	3.77	2.75
3.57	3.27	3.74	2.87
3.59	3.36	3.8	2.91
3.66	3.45	3.79	2.79
3.85	3.52	3.75	2.77

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=56715&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=56715&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56715&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( olo , hsh )	0.682166174285878	1.66533453693773e-14
tau( olo , venn< )	0.583759604194607	5.41069411497119e-11
tau( olo , venn> )	0.585766964287043	4.3888448431062e-11
tau( hsh , venn< )	0.813512031346461	0
tau( hsh , venn> )	0.815192743764172	0
tau( venn< , venn> )	0.935567220976251	0

\begin{tabular}{lllllllll}
\hline
Kendall tau rank correlations for all pairs of data series \tabularnewline
pair & tau & p-value \tabularnewline
tau( olo , hsh ) & 0.682166174285878 & 1.66533453693773e-14 \tabularnewline
tau( olo , venn< ) & 0.583759604194607 & 5.41069411497119e-11 \tabularnewline
tau( olo , venn> ) & 0.585766964287043 & 4.3888448431062e-11 \tabularnewline
tau( hsh , venn< ) & 0.813512031346461 & 0 \tabularnewline
tau( hsh , venn> ) & 0.815192743764172 & 0 \tabularnewline
tau( venn< , venn> ) & 0.935567220976251 & 0 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=56715&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( olo , hsh )[/C][C]0.682166174285878[/C][C]1.66533453693773e-14[/C][/ROW]
[ROW][C]tau( olo , venn< )[/C][C]0.583759604194607[/C][C]5.41069411497119e-11[/C][/ROW]
[ROW][C]tau( olo , venn> )[/C][C]0.585766964287043[/C][C]4.3888448431062e-11[/C][/ROW]
[ROW][C]tau( hsh , venn< )[/C][C]0.813512031346461[/C][C]0[/C][/ROW]
[ROW][C]tau( hsh , venn> )[/C][C]0.815192743764172[/C][C]0[/C][/ROW]
[ROW][C]tau( venn< , venn> )[/C][C]0.935567220976251[/C][C]0[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=56715&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=56715&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( olo , hsh )	0.682166174285878	1.66533453693773e-14
tau( olo , venn< )	0.583759604194607	5.41069411497119e-11
tau( olo , venn> )	0.585766964287043	4.3888448431062e-11
tau( hsh , venn< )	0.813512031346461	0
tau( hsh , venn> )	0.815192743764172	0
tau( venn< , venn> )	0.935567220976251	0

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