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, 06 Dec 2012 14:15:48 -0500

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/2012/Dec/06/t1354821374jwbgzkm2cd4eido.htm/, Retrieved Fri, 19 Apr 2024 10:48:11 +0000

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

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

-     [Kendall tau Correlation Matrix] [] [2010-12-05 18:04:16] [b98453cac15ba1066b407e146608df68]
- RMPD    [Kendall tau Correlation Matrix] [kendall tau] [2012-12-06 19:15:48] [6c45f368330652e778bc9af460dd8da6] [Current]

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

1418	210907	56	3	145
869	120982	56	4	101
1530	176508	54	12	98
2172	179321	89	2	132
901	123185	40	1	60
463	52746	25	3	38
3201	385534	92	0	144
371	33170	18	0	5
1192	101645	63	0	28
1583	149061	44	5	84
1439	165446	33	0	79
1764	237213	84	0	127
1495	173326	88	7	78
1373	133131	55	7	60
2187	258873	60	3	131
1491	180083	66	9	84
4041	324799	154	0	133
1706	230964	53	4	150
2152	236785	119	3	91
1036	135473	41	0	132
1882	202925	61	7	136
1929	215147	58	0	124
2242	344297	75	1	118
1220	153935	33	5	70
1289	132943	40	7	107
2515	174724	92	0	119
2147	174415	100	0	89
2352	225548	112	5	112
1638	223632	73	0	108
1222	124817	40	0	52
1812	221698	45	0	112
1677	210767	60	3	116
1579	170266	62	4	123
1731	260561	75	1	125
807	84853	31	4	27
2452	294424	77	2	162
829	101011	34	0	32
1940	215641	46	0	64
2662	325107	99	0	92
186	7176	17	0	0
1499	167542	66	2	83
865	106408	30	1	41
1793	96560	76	0	47
2527	265769	146	2	120
2747	269651	67	10	105
1324	149112	56	6	79
2702	175824	107	0	65
1383	152871	58	5	70
1179	111665	34	4	55
2099	116408	61	1	39
4308	362301	119	2	67
918	78800	42	2	21
1831	183167	66	0	127
3373	277965	89	8	152
1713	150629	44	3	113
1438	168809	66	0	99
496	24188	24	0	7
2253	329267	259	8	141
744	65029	17	5	21
1161	101097	64	3	35
2352	218946	41	1	109
2144	244052	68	5	133
4691	341570	168	1	123
1112	103597	43	1	26
2694	233328	132	5	230
1973	256462	105	0	166
1769	206161	71	12	68
3148	311473	112	8	147
2474	235800	94	8	179
2084	177939	82	8	61
1954	207176	70	8	101
1226	196553	57	2	108
1389	174184	53	0	90
1496	143246	103	5	114
2269	187559	121	8	103
1833	187681	62	2	142
1268	119016	52	5	79
1943	182192	52	12	88
893	73566	32	6	25
1762	194979	62	7	83
1403	167488	45	2	113
1425	143756	46	0	118
1857	275541	63	4	110
1840	243199	75	3	129
1502	182999	88	6	51
1441	135649	46	2	93
1420	152299	53	0	76
1416	120221	37	1	49
2970	346485	90	0	118
1317	145790	63	5	38
1644	193339	78	2	141
870	80953	25	0	58
1654	122774	45	0	27
1054	130585	46	5	91
937	112611	41	0	48
3004	286468	144	1	63
2008	241066	82	0	56
2547	148446	91	1	144
1885	204713	71	1	73
1626	182079	63	2	168
1468	140344	53	6	64
2445	220516	62	1	97
1964	243060	63	4	117
1381	162765	32	2	100
1369	182613	39	3	149
1659	232138	62	0	187
2888	265318	117	10	127
1290	85574	34	0	37
2845	310839	92	9	245
1982	225060	93	7	87
1904	232317	54	0	177
1391	144966	144	0	49
602	43287	14	4	49
1743	155754	61	4	73
1559	164709	109	0	177
2014	201940	38	0	94
2143	235454	73	0	117
2146	220801	75	1	60
874	99466	50	0	55
1590	92661	61	1	39
1590	133328	55	0	64
1210	61361	77	0	26
2072	125930	75	4	64
1281	100750	72	0	58
1401	224549	50	4	95
834	82316	32	4	25
1105	102010	53	3	26
1272	101523	42	0	76
1944	243511	71	0	129
391	22938	10	0	11
761	41566	35	5	2
1605	152474	65	0	101
530	61857	25	4	28
1988	99923	66	0	36
1386	132487	41	0	89
2395	317394	86	1	193
387	21054	16	0	4
1742	209641	42	5	84
620	22648	19	0	23
449	31414	19	0	39
800	46698	45	0	14
1684	131698	65	0	78
1050	91735	35	0	14
2699	244749	95	2	101
1606	184510	49	7	82
1502	79863	37	1	24
1204	128423	64	8	36
1138	97839	38	2	75
568	38214	34	0	16
1459	151101	32	2	55
2158	272458	65	0	131
1111	172494	52	0	131
1421	108043	62	1	39
2833	328107	65	3	144
1955	250579	83	0	139
2922	351067	95	3	211
1002	158015	29	0	78
1060	98866	18	0	50
956	85439	33	0	39
2186	229242	247	4	90
3604	351619	139	4	166
1035	84207	29	11	12
1417	120445	118	0	57
3261	324598	110	0	133
1587	131069	67	4	69
1424	204271	42	0	119
1701	165543	65	1	119
1249	141722	94	0	65
946	116048	64	0	61
1926	250047	81	0	49
3352	299775	95	9	101
1641	195838	67	1	196
2035	173260	63	3	15
2312	254488	83	10	136
1369	104389	45	5	89
1577	136084	30	0	40
2201	199476	70	2	123
961	92499	32	0	21
1900	224330	83	1	163
1254	135781	31	2	29
1335	74408	67	4	35
1597	81240	66	0	13
207	14688	10	0	5
1645	181633	70	2	96
2429	271856	103	1	151
151	7199	5	0	6
474	46660	20	0	13
141	17547	5	0	3
1639	133368	36	1	56
872	95227	34	0	23
1318	152601	48	2	57
1018	98146	40	0	14
1383	79619	43	3	43
1314	59194	31	6	20
1335	139942	42	0	72
1403	118612	46	2	87
910	72880	33	0	21
616	65475	18	2	56
1407	99643	55	1	59
771	71965	35	1	82
766	77272	59	2	43
473	49289	19	1	25
1376	135131	66	0	38
1232	108446	60	1	25
1521	89746	36	3	38
572	44296	25	0	12
1059	77648	47	0	29
1544	181528	54	0	47
1230	134019	53	0	45
1206	124064	40	1	40
1205	92630	40	4	30
1255	121848	39	0	41
613	52915	14	0	25
721	81872	45	0	23
1109	58981	36	7	14
740	53515	28	2	16
1126	60812	44	0	26
728	56375	30	7	21
689	65490	22	3	27
592	80949	17	0	9
995	76302	31	0	33
1613	104011	55	6	42
2048	98104	54	2	68
705	67989	21	0	32
301	30989	14	0	6
1803	135458	81	3	67
799	73504	35	0	33
861	63123	43	1	77
1186	61254	46	1	46
1451	74914	30	0	30
628	31774	23	1	0
1161	81437	38	0	36
1463	87186	54	0	46
742	50090	20	0	18
979	65745	53	0	48
675	56653	45	0	29
1241	158399	39	0	28
676	46455	20	0	34
1049	73624	24	0	33
620	38395	31	0	34
1081	91899	35	0	33
1688	139526	151	0	80
736	52164	52	0	32
617	51567	30	2	30
812	70551	31	0	41
1051	84856	29	1	41
1656	102538	57	1	51
705	86678	40	0	18
945	85709	44	0	34
554	34662	25	0	31
1597	150580	77	0	39
982	99611	35	0	54
222	19349	11	0	14
1212	99373	63	1	24
1143	86230	44	0	24
435	30837	19	0	8
532	31706	13	0	26
882	89806	42	0	19
608	62088	38	1	11
459	40151	29	0	14
578	27634	20	0	1
826	76990	27	0	39
509	37460	20	0	5
717	54157	19	0	37
637	49862	37	0	32
857	84337	26	0	38
830	64175	42	0	47
652	59382	49	0	47
707	119308	30	0	37
954	76702	49	0	51
1461	103425	67	1	45
672	70344	28	0	21
778	43410	19	0	1
1141	104838	49	1	42
680	62215	27	0	26
1090	69304	30	6	21
616	53117	22	3	4
285	19764	12	1	10
1145	86680	31	2	43
733	84105	20	0	34
888	77945	20	0	31
849	89113	39	0	19
1182	91005	29	3	34
528	40248	16	1	6
642	64187	27	0	11
947	50857	21	0	24
819	56613	19	1	16
757	62792	35	0	72
894	72535	14	0	21

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' @ jenkins.wessa.net

\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' @ jenkins.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=197221&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' @ jenkins.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=197221&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=197221&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' @ jenkins.wessa.net

Correlations for all pairs of data series (method=kendall)
	reviews	time	logins	shared	blogs
reviews	1	0.739	0.661	0.251	0.583
time	0.739	1	0.609	0.245	0.665
logins	0.661	0.609	1	0.208	0.512
shared	0.251	0.245	0.208	1	0.227
blogs	0.583	0.665	0.512	0.227	1

\begin{tabular}{lllllllll}
\hline
Correlations for all pairs of data series (method=kendall) \tabularnewline
  & reviews & time & logins & shared & blogs \tabularnewline
reviews & 1 & 0.739 & 0.661 & 0.251 & 0.583 \tabularnewline
time & 0.739 & 1 & 0.609 & 0.245 & 0.665 \tabularnewline
logins & 0.661 & 0.609 & 1 & 0.208 & 0.512 \tabularnewline
shared & 0.251 & 0.245 & 0.208 & 1 & 0.227 \tabularnewline
blogs & 0.583 & 0.665 & 0.512 & 0.227 & 1 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=197221&T=1

[TABLE]
[ROW][C]Correlations for all pairs of data series (method=kendall)[/C][/ROW]
[ROW][C] [/C][C]reviews[/C][C]time[/C][C]logins[/C][C]shared[/C][C]blogs[/C][/ROW]
[ROW][C]reviews[/C][C]1[/C][C]0.739[/C][C]0.661[/C][C]0.251[/C][C]0.583[/C][/ROW]
[ROW][C]time[/C][C]0.739[/C][C]1[/C][C]0.609[/C][C]0.245[/C][C]0.665[/C][/ROW]
[ROW][C]logins[/C][C]0.661[/C][C]0.609[/C][C]1[/C][C]0.208[/C][C]0.512[/C][/ROW]
[ROW][C]shared[/C][C]0.251[/C][C]0.245[/C][C]0.208[/C][C]1[/C][C]0.227[/C][/ROW]
[ROW][C]blogs[/C][C]0.583[/C][C]0.665[/C][C]0.512[/C][C]0.227[/C][C]1[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=197221&T=1

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

As an alternative you can also use a QR Code:

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

Correlations for all pairs of data series (method=kendall)
	reviews	time	logins	shared	blogs
reviews	1	0.739	0.661	0.251	0.583
time	0.739	1	0.609	0.245	0.665
logins	0.661	0.609	1	0.208	0.512
shared	0.251	0.245	0.208	1	0.227
blogs	0.583	0.665	0.512	0.227	1

Correlations for all pairs of data series with p-values
pair	Pearson r	Spearman rho	Kendall tau
reviews;time	0.8928	0.9025	0.7387
p-value	(0)	(0)	(0)
reviews;logins	0.7588	0.845	0.6609
p-value	(0)	(0)	(0)
reviews;shared	0.2972	0.341	0.2511
p-value	(0)	(0)	(0)
reviews;blogs	0.7024	0.7796	0.5828
p-value	(0)	(0)	(0)
time;logins	0.716	0.7982	0.609
p-value	(0)	(0)	(0)
time;shared	0.2941	0.3296	0.2453
p-value	(0)	(0)	(0)
time;blogs	0.8143	0.8573	0.665
p-value	(0)	(0)	(0)
logins;shared	0.2505	0.2795	0.2078
p-value	(0)	(0)	(0)
logins;blogs	0.581	0.7078	0.5116
p-value	(0)	(0)	(0)
shared;blogs	0.2659	0.3064	0.2269
p-value	(0)	(0)	(0)

\begin{tabular}{lllllllll}
\hline
Correlations for all pairs of data series with p-values \tabularnewline
pair & Pearson r & Spearman rho & Kendall tau \tabularnewline
reviews;time & 0.8928 & 0.9025 & 0.7387 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
reviews;logins & 0.7588 & 0.845 & 0.6609 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
reviews;shared & 0.2972 & 0.341 & 0.2511 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
reviews;blogs & 0.7024 & 0.7796 & 0.5828 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
time;logins & 0.716 & 0.7982 & 0.609 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
time;shared & 0.2941 & 0.3296 & 0.2453 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
time;blogs & 0.8143 & 0.8573 & 0.665 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
logins;shared & 0.2505 & 0.2795 & 0.2078 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
logins;blogs & 0.581 & 0.7078 & 0.5116 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
shared;blogs & 0.2659 & 0.3064 & 0.2269 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=197221&T=2

[TABLE]
[ROW][C]Correlations for all pairs of data series with p-values[/C][/ROW]
[ROW][C]pair[/C][C]Pearson r[/C][C]Spearman rho[/C][C]Kendall tau[/C][/ROW]
[ROW][C]reviews;time[/C][C]0.8928[/C][C]0.9025[/C][C]0.7387[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]reviews;logins[/C][C]0.7588[/C][C]0.845[/C][C]0.6609[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]reviews;shared[/C][C]0.2972[/C][C]0.341[/C][C]0.2511[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]reviews;blogs[/C][C]0.7024[/C][C]0.7796[/C][C]0.5828[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]time;logins[/C][C]0.716[/C][C]0.7982[/C][C]0.609[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]time;shared[/C][C]0.2941[/C][C]0.3296[/C][C]0.2453[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]time;blogs[/C][C]0.8143[/C][C]0.8573[/C][C]0.665[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]logins;shared[/C][C]0.2505[/C][C]0.2795[/C][C]0.2078[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]logins;blogs[/C][C]0.581[/C][C]0.7078[/C][C]0.5116[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]shared;blogs[/C][C]0.2659[/C][C]0.3064[/C][C]0.2269[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=197221&T=2

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

As an alternative you can also use a QR Code:

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

Correlations for all pairs of data series with p-values
pair	Pearson r	Spearman rho	Kendall tau
reviews;time	0.8928	0.9025	0.7387
p-value	(0)	(0)	(0)
reviews;logins	0.7588	0.845	0.6609
p-value	(0)	(0)	(0)
reviews;shared	0.2972	0.341	0.2511
p-value	(0)	(0)	(0)
reviews;blogs	0.7024	0.7796	0.5828
p-value	(0)	(0)	(0)
time;logins	0.716	0.7982	0.609
p-value	(0)	(0)	(0)
time;shared	0.2941	0.3296	0.2453
p-value	(0)	(0)	(0)
time;blogs	0.8143	0.8573	0.665
p-value	(0)	(0)	(0)
logins;shared	0.2505	0.2795	0.2078
p-value	(0)	(0)	(0)
logins;blogs	0.581	0.7078	0.5116
p-value	(0)	(0)	(0)
shared;blogs	0.2659	0.3064	0.2269
p-value	(0)	(0)	(0)

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = kendall ;

Parameters (R input):

par1 = kendall ;

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=par1)
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')
n <- length(y[,1])
n
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,paste('Correlations for all pairs of data series (method=',par1,')',sep=''),n+1,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,' ',header=TRUE)
for (i in 1:n) {
a<-table.element(a,dimnames(t(x))[[2]][i],header=TRUE)
}
a<-table.row.end(a)
for (i in 1:n) {
a<-table.row.start(a)
a<-table.element(a,dimnames(t(x))[[2]][i],header=TRUE)
for (j in 1:n) {
r <- cor.test(y[i,],y[j,],method=par1)
a<-table.element(a,round(r$estimate,3))
}
a<-table.row.end(a)
}
a<-table.end(a)
table.save(a,file='mytable.tab')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Correlations for all pairs of data series with p-values',4,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'pair',1,TRUE)
a<-table.element(a,'Pearson r',1,TRUE)
a<-table.element(a,'Spearman rho',1,TRUE)
a<-table.element(a,'Kendall tau',1,TRUE)
a<-table.row.end(a)
cor.test(y[1,],y[2,],method=par1)
for (i in 1:(n-1))
{
for (j in (i+1):n)
{
a<-table.row.start(a)
dum <- paste(dimnames(t(x))[[2]][i],';',dimnames(t(x))[[2]][j],sep='')
a<-table.element(a,dum,header=TRUE)
rp <- cor.test(y[i,],y[j,],method='pearson')
a<-table.element(a,round(rp$estimate,4))
rs <- cor.test(y[i,],y[j,],method='spearman')
a<-table.element(a,round(rs$estimate,4))
rk <- cor.test(y[i,],y[j,],method='kendall')
a<-table.element(a,round(rk$estimate,4))
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'p-value',header=T)
a<-table.element(a,paste('(',round(rp$p.value,4),')',sep=''))
a<-table.element(a,paste('(',round(rs$p.value,4),')',sep=''))
a<-table.element(a,paste('(',round(rk$p.value,4),')',sep=''))
a<-table.row.end(a)
}
}
a<-table.end(a)
table.save(a,file='mytable1.tab')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code