Repository of Reproducible Computations

Free Statistics

of Irreproducible Research!

Author's title

Author

*Unverified author*

R Software Module

rwasp_pairs.wasp

Title produced by software

Kendall tau Correlation Matrix

Date of computation

Sat, 03 Nov 2007 14:44:17 -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/2007/Nov/03/262rc6akfdcl9zs1194127834.htm/, Retrieved Mon, 29 Apr 2024 10:10:33 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=170, Retrieved Mon, 29 Apr 2024 10:10:33 +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

Kendell-tau matrix

Estimated Impact

339

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

-       [Kendall tau Correlation Matrix] [Correlatie tussen...] [2007-11-03 21:44:17] [d66dce91cbb8b108f7114f1eb0c2faa2] [Current]
- RMPD    [(Partial) Autocorrelation Function] [WS 8 01] [2009-11-21 08:59:55] [6e4e01d7eb22a9f33d58ebb35753a195] 
-   PD      [(Partial) Autocorrelation Function] [WS 8 02] [2009-11-21 11:01:08] [6e4e01d7eb22a9f33d58ebb35753a195] 
-   P         [(Partial) Autocorrelation Function] [WS 8 03] [2009-11-21 11:02:54] [6e4e01d7eb22a9f33d58ebb35753a195] 
-   P           [(Partial) Autocorrelation Function] [WS 8 04] [2009-11-21 11:06:04] [6e4e01d7eb22a9f33d58ebb35753a195] 
-   P             [(Partial) Autocorrelation Function] [ws 8 01b] [2009-11-24 22:56:18] [6e4e01d7eb22a9f33d58ebb35753a195] 
-   P           [(Partial) Autocorrelation Function] [ws9] [2009-11-29 12:25:47] [6e4e01d7eb22a9f33d58ebb35753a195] 
- RMPD            [Harrell-Davis Quantiles] [WS 9 H] [2009-12-01 21:25:24] [6e4e01d7eb22a9f33d58ebb35753a195] 
-    D              [Harrell-Davis Quantiles] [significantie res...] [2009-12-29 16:01:07] [b5ba85a7ae9f50cb97d92cbc56161b32] 
- RMPD            [Mean Plot] [ws 9 m] [2009-12-01 21:28:00] [6e4e01d7eb22a9f33d58ebb35753a195] 
- R PD      [(Partial) Autocorrelation Function] [Paper autocorrelatie] [2010-12-21 11:58:24] [a9e130f95bad0a0597234e75c6380c5a] 
-    D        [(Partial) Autocorrelation Function] [] [2011-12-20 19:58:37] [06f5daa9a1979410bf169cb7a41fb3eb] 
- R PD      [(Partial) Autocorrelation Function] [Paper optimale au...] [2010-12-21 12:11:51] [a9e130f95bad0a0597234e75c6380c5a] 
-    D        [(Partial) Autocorrelation Function] [] [2011-12-20 20:05:16] [06f5daa9a1979410bf169cb7a41fb3eb] 
- RMPD      [Variance Reduction Matrix] [Paper VRM] [2010-12-21 12:23:34] [a9e130f95bad0a0597234e75c6380c5a] 
-    D        [Variance Reduction Matrix] [] [2011-12-20 20:25:09] [06f5daa9a1979410bf169cb7a41fb3eb] 
- RMPD      [Spectral Analysis] [Paper Cumulatief ...] [2010-12-21 12:58:46] [a9e130f95bad0a0597234e75c6380c5a] 

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

1178	2529	22	476049
2141	2196	27	474605
2238	3202	24	470439
2685	2718	24	461251
4341	2728	22	454724
5376	2354	23	455626
4478	2697	25	516847
6404	2651	23	525192
4617	2067	21	522975
3024	2641	21	518585
1897	2539	22	509239
2075	2294	20	512238
1351	2712	22	519164
2211	2314	22	517009
2453	3092	20	509933
3042	2677	21	509127
4765	2813	20	500857
4992	2668	21	506971
4601	2939	21	569323
6266	2617	21	579714
4812	2231	19	577992
3159	2481	21	565464
1916	2421	21	547344
2237	2408	22	554788
1595	2560	19	562325
2453	2100	24	560854
2226	3315	22	555332
3597	2801	22	543599
4706	2403	22	536662
4974	3024	24	542722
5756	2507	22	593530
5493	2980	23	610763
5004	2211	24	612613
3225	2471	21	611324
2006	2594	20	594167
2291	2452	22	595454
1588	2232	23	590865
2105	2373	23	589379
2191	3127	22	584428
3591	2802	20	573100
4668	2641	21	567456
4885	2787	21	569028
5822	2619	20	620735
5599	2806	20	628884
5340	2193	17	628232
3082	2323	18	612117
2010	2529	19	595404
2301	2412	19	597141
1514	2262	20	593408
1979	2154	21	590072
2480	3230	20	579799
3499	2295	21	574205
4676	2715	19	572775
5585	2733	22	572942
5610	2317	20	619567
5796	2730	18	625809
6199	1913	16	619916
3030	2390	17	587625
1930	2484	18	565742
2552	1960	19	557274

Summary of compuational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'Gwilym Jenkins' @ 72.249.127.135

\begin{tabular}{lllllllll}
\hline
Summary of compuational 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 & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=170&T=0

[TABLE]
[ROW][C]Summary of compuational 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]'Gwilym Jenkins' @ 72.249.127.135[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=170&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=170&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 compuational transaction
Raw Input	view raw input (R code)
Raw Output	view raw output of R engine
Computing time	1 seconds
R Server	'Gwilym Jenkins' @ 72.249.127.135

Kendall tau rank correlations for all pairs of data series
pair	tau	p-value
tau( Hwlkn , Schdngn )	0.0752049789740407	0.396261912831272
tau( Hwlkn , FinSit )	-0.0528822129590333	0.573230005281627
tau( Hwlkn , TotWerk )	0.165583504773696	0.0616546915416822
tau( Schdngn , FinSit )	0.103970292229189	0.268208464926876
tau( Schdngn , TotWerk )	-0.135669891659975	0.125827482746360
tau( FinSit , TotWerk )	-0.333003048952811	0.000388044574297647

\begin{tabular}{lllllllll}
\hline
Kendall tau rank correlations for all pairs of data series \tabularnewline
pair & tau & p-value \tabularnewline
tau( Hwlkn , Schdngn ) & 0.0752049789740407 & 0.396261912831272 \tabularnewline
tau( Hwlkn , FinSit ) & -0.0528822129590333 & 0.573230005281627 \tabularnewline
tau( Hwlkn , TotWerk
 ) & 0.165583504773696 & 0.0616546915416822 \tabularnewline
tau( Schdngn , FinSit ) & 0.103970292229189 & 0.268208464926876 \tabularnewline
tau( Schdngn , TotWerk
 ) & -0.135669891659975 & 0.125827482746360 \tabularnewline
tau( FinSit , TotWerk
 ) & -0.333003048952811 & 0.000388044574297647 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=170&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( Hwlkn , Schdngn )[/C][C]0.0752049789740407[/C][C]0.396261912831272[/C][/ROW]
[ROW][C]tau( Hwlkn , FinSit )[/C][C]-0.0528822129590333[/C][C]0.573230005281627[/C][/ROW]
[ROW][C]tau( Hwlkn , TotWerk
 )[/C][C]0.165583504773696[/C][C]0.0616546915416822[/C][/ROW]
[ROW][C]tau( Schdngn , FinSit )[/C][C]0.103970292229189[/C][C]0.268208464926876[/C][/ROW]
[ROW][C]tau( Schdngn , TotWerk
 )[/C][C]-0.135669891659975[/C][C]0.125827482746360[/C][/ROW]
[ROW][C]tau( FinSit , TotWerk
 )[/C][C]-0.333003048952811[/C][C]0.000388044574297647[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=170&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=170&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( Hwlkn , Schdngn )	0.0752049789740407	0.396261912831272
tau( Hwlkn , FinSit )	-0.0528822129590333	0.573230005281627
tau( Hwlkn , TotWerk )	0.165583504773696	0.0616546915416822
tau( Schdngn , FinSit )	0.103970292229189	0.268208464926876
tau( Schdngn , TotWerk )	-0.135669891659975	0.125827482746360
tau( FinSit , TotWerk )	-0.333003048952811	0.000388044574297647

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