Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software ModulePatrick.Wessarwasp_pairs.wasp
Title produced by softwareKendall tau Correlation Matrix
Date of computationTue, 21 Dec 2010 14:45:19 +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/21/t129294265501dbex4zrvvtcbq.htm/, Retrieved Sun, 19 May 2024 18:22:49 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=113629, Retrieved Sun, 19 May 2024 18:22:49 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact118
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 17:44:33] [b98453cac15ba1066b407e146608df68]
- R PD    [Kendall tau Correlation Matrix] [] [2010-12-21 14:45:19] [c1585b71a1b15294a02e0a160577aa4f] [Current]
Feedback Forum

Post a new message
Dataseries X:
1	1081	213118	6282929
1	309	81767	4324047
1	458	153198	4108272
0	588	-26007	-1212617
1	299	126942	1485329
1	156	157214	1779876
0	481	129352	1367203
1	323	234817	2519076
1	452	60448	912684
1	109	47818	1443586
0	115	245546	1220017
0	110	48020	984885
1	239	-1710	1457425
0	247	32648	-572920
1	497	95350	929144
0	103	151352	1151176
0	109	288170	790090
1	502	114337	774497
1	248	37884	990576
0	373	122844	454195
1	119	82340	876607
1	84	79801	711969
0	102	165548	702380
0	295	116384	264449
0	105	134028	450033
0	64	63838	541063
1	267	74996	588864
0	129	31080	-37216
0	37	32168	783310
0	361	49857	467359
1	28	87161	688779
1	85	106113	608419
1	44	80570	696348
1	49	102129	597793
0	22	301670	821730
0	155	102313	377934
0	91	88577	651939
1	81	112477	697458
1	79	191778	700368
0	145	79804	225986
0	816	128294	348695
0	61	96448	373683
0	226	93811	501709
0	105	117520	413743
0	62	69159	379825
1	24	101792	336260
1	26	210568	636765
1	322	136996	481231
0	84	121920	469107
0	33	76403	211928
1	108	108094	563925
1	150	134759	511939
1	115	188873	521016
1	162	146216	543856
1	158	156608	329304
0	97	61348	423262
0	9	50350	509665
0	66	87720	455881
0	107	99489	367772
1	101	87419	406339
1	47	94355	493408
0	38	60326	232942
1	34	94670	416002
1	84	82425	337430
0	79	59017	361517
0	947	90829	360962
0	74	80791	235561
1	53	100423	408247
0	94	131116	450296
1	63	100269	418799
1	58	27330	247405
0	49	39039	378519
0	34	106885	326638
0	11	79285	328233
0	35	118881	386225
1	17	77623	283662
0	47	114768	370225
0	43	74015	269236
0	117	69465	365732
1	171	117869	420383
0	26	60982	345811
1	73	90131	431809
0	59	138971	418876
0	18	39625	297476
0	15	102725	416776
1	72	64239	357257
0	86	90262	458343
0	14	103960	388386
0	64	106611	358934
0	11	103345	407560
0	52	95551	392558
1	41	82903	373177
0	99	63593	428370
1	75	126910	369419
0	45	37527	358649
1	43	60247	376641
0	8	112995	467427
1	198	70184	364885
0	22	130140	436230
1	11	73221	329118
1	33	76114	317365
0	23	90534	286849
0	80	108479	376685
0	18	113761	407198
0	28	68696	377772
0	23	71561	271483
1	60	59831	153661
1	20	97890	513294
0	59	101481	324881
1	36	72954	264512
0	30	67939	420968
1	47	48022	129302
0	71	86111	191521
1	14	74020	268673
1	9	57530	353179
0	39	56364	354624
0	26	84990	363713
0	21	88590	456657
1	16	77200	211742
0	69	61262	338381
0	92	110309	418530
0	14	67000	351483
0	103	93099	372928
1	29	107577	485538
1	37	62920	279268
1	23	75832	219060
0	0	60720	325560
0	7	60793	325314
0	28	57935	322046
0	0	60720	325560
0	8	60630	325599
0	63	55637	377028
0	0	60720	325560
0	3	60887	323850
0	0	60720	325560
0	9	60505	331514
0	13	60945	325632
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	14	58990	322265
0	0	60720	325560
0	15	56750	325906
0	3	60894	325985
0	15	63346	346145
0	11	56535	325898
0	0	60720	325560
0	6	60835	325356
0	0	60720	325560
0	1	61016	325930
0	10	58650	318020
0	73	60438	326389
0	0	60720	325560
0	11	58625	302925
0	3	60938	325540
0	0	60720	325560
0	0	60720	325560
0	2	61490	326736
0	7	60845	340580
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	27	60830	331828
0	51	63261	323299
0	0	60720	325560
0	0	60720	325560
0	19	45689	387722
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	4	61564	324598
0	0	60720	325560
0	9	61938	328726
0	0	60720	325560
0	8	60951	325043
0	0	60720	325560
1	1	60745	325806
0	0	60720	325560
0	0	60720	325560
0	34	71642	387732
1	10	71641	349729
0	38	55792	332202
1	10	71873	305442
1	5	62555	329537
1	14	60370	327055
1	16	64873	356245
0	5	62041	328451
0	5	65745	307062
0	0	60720	325560
0	4	59500	331345
0	0	60720	325560
0	6	61630	331824
0	0	60720	325560
0	2	60890	325685
1	0	60720	325560
1	80	113521	404480
1	0	60720	325560
1	0	60720	325560
1	20	80045	318314
1	0	60720	325560
1	0	60720	325560
1	0	60720	325560
1	27	50804	311807
1	17	87390	337724
1	2	61656	326431
1	4	65688	327556
1	0	60720	325560
1	32	48522	356850
1	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	32	57640	322741
0	20	61977	310902
0	7	62620	324295
0	0	60720	325560
0	8	60831	326156
0	28	60646	326960
0	0	60720	325560
0	20	56225	333411
0	4	60510	297761
0	0	60720	325560
0	2	60698	325536
0	0	60720	325560
0	2	60805	325762
0	26	61404	327957
0	0	60720	325560
0	0	60720	325560
0	4	65276	318521
0	0	60720	325560
0	9	63915	319775
0	0	60720	325560
0	0	60720	325560
0	17	61686	332128
0	0	60720	325560
0	1	60743	325486
0	0	60720	325560
0	6	60349	325838
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	3	61360	331767
0	0	60720	325560
0	8	59818	324523
0	4	72680	339995
1	0	60720	325560
1	0	60720	325560
0	11	61808	319582
1	0	60720	325560
1	0	60720	325560
0	9	53110	307245
1	0	60720	325560
0	2	64245	317967
0	73	73007	331488
0	85	82732	335452
0	0	60720	325560
0	8	54820	334184
0	35	47705	313213
1	0	60720	325560
0	0	60720	325560
1	0	60720	325560
1	0	60720	325560
0	12	72835	348678
0	15	58856	328727
1	0	60720	325560
0	0	60720	325560
1	0	60720	325560
0	11	77655	387978
1	0	60720	325560
0	6	69817	336704
1	0	60720	325560
1	0	60720	325560
1	0	60720	325560
0	12	60798	322076
0	0	60720	325560
0	30	62452	334272
0	33	64175	338197
0	0	60720	325560
1	82	67440	321024
0	28	68136	322145
1	0	60720	325560
0	0	60720	325560
0	72	56726	323351
0	0	60720	325560
0	13	70811	327748
0	0	60720	325560
1	0	60720	325560
0	4	62045	328157
1	0	60720	325560
0	62	54323	311594
1	0	60720	325560
0	24	62841	335962
0	21	81125	372426
0	0	60720	325560
0	14	59506	319844
1	21	59365	355822
0	0	60720	325560
1	0	60720	325560
0	0	60720	325560
0	0	60720	325560
1	4	60798	324047
0	2	58790	311464
0	0	60720	325560
1	0	60720	325560
0	53	61808	353417
0	9	60735	325590
1	0	60720	325560
1	13	64016	328576
0	22	54683	326126
1	0	60720	325560
1	0	60720	325560
0	83	87192	369376
1	0	60720	325560
1	8	64107	332013
0	4	60761	325871
0	14	65990	342165
0	1	59988	324967
0	17	61167	314832
0	6	60719	325557
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
1	0	60720	325560
0	0	60720	325560
0	2	60722	322649
1	0	60720	325560
1	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	5	60379	324598
0	2	60727	325567
0	0	60720	325560
0	7	60925	324005
0	0	60720	325560
0	1	60896	325748
0	13	59734	323385
0	15	62969	315409
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	6	59118	312275
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	14	58598	320576
0	10	61124	325246
0	12	59595	332961
0	2	62065	323010
0	0	60720	325560
0	0	60720	325560
0	52	78780	345253
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	4	60722	325559
0	0	60720	325560
0	0	60720	325560
1	3	61600	319634
0	11	59635	319951
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	40	59781	318519
0	9	76644	343222
0	1	64820	317234
0	0	60720	325560
0	0	60720	325560
0	24	56178	314025
0	11	60436	320249
0	0	60720	325560
0	0	60720	325560
0	0	60720	325560
0	60	73433	349365
0	80	41477	289197
0	0	60720	325560
0	16	62700	329245
0	40	67804	240869
0	6	59661	327182
0	8	58620	322876
0	3	60398	323117
0	16	58580	306351
0	10	62710	335137
0	8	59325	308271
0	7	60950	301731
0	8	68060	382409
1	12	83620	279230
0	13	58456	298731
0	42	52811	243650
1	118	121173	532682
0	9	63870	319771
1	138	21001	171493
0	5	70415	347262
0	9	64230	343945
0	8	59190	311874
1	25	69351	302211
0	7	64270	316708
0	13	70694	333463
0	16	68005	344282
0	11	58930	319635
0	11	58320	301186
0	3	69980	300381
0	61	69863	318765
1	24	63255	286146
1	17	57320	306844
1	33	75230	307705
0	7	79420	312448
0	3	73490	299715
0	66	35250	373399
1	17	62285	299446
0	26	69206	325586
0	3	65920	291221
0	2	69770	261173
0	67	72683	255027
1	70	-14545	-78375
0	26	55830	-58143
0	24	55174	227033
1	94	67038	235098
0	30	51252	21267
0	223	157278	238675
0	48	79510	197687
0	90	77440	418341
0	180	27284	-297706




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time3 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135
R Framework error message
The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.

\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 & 3 seconds \tabularnewline
R Server & 'Gwilym Jenkins' @ 72.249.127.135 \tabularnewline
R Framework error message & 
The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.
\tabularnewline \hline \end{tabular} %Source: https://freestatistics.org/blog/index.php?pk=113629&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]3 seconds[/C][/ROW]
[ROW][C]R Server[/C][C]'Gwilym Jenkins' @ 72.249.127.135[/C][/ROW]
[ROW][C]R Framework error message[/C][C]
The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.
[/C][/ROW] [/TABLE] Source: https://freestatistics.org/blog/index.php?pk=113629&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=113629&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 Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time3 seconds
R Server'Gwilym Jenkins' @ 72.249.127.135
R Framework error message
The field 'Names of X columns' contains a hard return which cannot be interpreted.
Please, resubmit your request without hard returns in the 'Names of X columns'.







Correlations for all pairs of data series (method=pearson)
GroupTradesDividendsWealth
Group10.1590.1470.218
Trades0.15910.3470.516
Dividends0.1470.34710.442
Wealth 0.2180.5160.4421

\begin{tabular}{lllllllll}
\hline
Correlations for all pairs of data series (method=pearson) \tabularnewline
  & Group & Trades & Dividends & Wealth
 \tabularnewline
Group & 1 & 0.159 & 0.147 & 0.218 \tabularnewline
Trades & 0.159 & 1 & 0.347 & 0.516 \tabularnewline
Dividends & 0.147 & 0.347 & 1 & 0.442 \tabularnewline
Wealth
 & 0.218 & 0.516 & 0.442 & 1 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=113629&T=1

[TABLE]
[ROW][C]Correlations for all pairs of data series (method=pearson)[/C][/ROW]
[ROW][C] [/C][C]Group[/C][C]Trades[/C][C]Dividends[/C][C]Wealth
[/C][/ROW]
[ROW][C]Group[/C][C]1[/C][C]0.159[/C][C]0.147[/C][C]0.218[/C][/ROW]
[ROW][C]Trades[/C][C]0.159[/C][C]1[/C][C]0.347[/C][C]0.516[/C][/ROW]
[ROW][C]Dividends[/C][C]0.147[/C][C]0.347[/C][C]1[/C][C]0.442[/C][/ROW]
[ROW][C]Wealth
[/C][C]0.218[/C][C]0.516[/C][C]0.442[/C][C]1[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=113629&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=113629&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=pearson)
GroupTradesDividendsWealth
Group10.1590.1470.218
Trades0.15910.3470.516
Dividends0.1470.34710.442
Wealth 0.2180.5160.4421







Correlations for all pairs of data series with p-values
pairPearson rSpearman rhoKendall tau
Group;Trades0.15860.15830.1344
p-value(0.001)(0.001)(0.001)
Group;Dividends0.14740.17430.1476
p-value(0.0022)(3e-04)(3e-04)
Group;Wealth 0.2180.14810.1254
p-value(0)(0.002)(0.0021)
Trades;Dividends0.34720.41910.3349
p-value(0)(0)(0)
Trades;Wealth 0.51590.35750.2586
p-value(0)(0)(0)
Dividends;Wealth 0.44230.43090.3396
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
Group;Trades & 0.1586 & 0.1583 & 0.1344 \tabularnewline
p-value & (0.001) & (0.001) & (0.001) \tabularnewline
Group;Dividends & 0.1474 & 0.1743 & 0.1476 \tabularnewline
p-value & (0.0022) & (3e-04) & (3e-04) \tabularnewline
Group;Wealth
 & 0.218 & 0.1481 & 0.1254 \tabularnewline
p-value & (0) & (0.002) & (0.0021) \tabularnewline
Trades;Dividends & 0.3472 & 0.4191 & 0.3349 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Trades;Wealth
 & 0.5159 & 0.3575 & 0.2586 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Dividends;Wealth
 & 0.4423 & 0.4309 & 0.3396 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=113629&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]Group;Trades[/C][C]0.1586[/C][C]0.1583[/C][C]0.1344[/C][/ROW]
[ROW][C]p-value[/C][C](0.001)[/C][C](0.001)[/C][C](0.001)[/C][/ROW]
[ROW][C]Group;Dividends[/C][C]0.1474[/C][C]0.1743[/C][C]0.1476[/C][/ROW]
[ROW][C]p-value[/C][C](0.0022)[/C][C](3e-04)[/C][C](3e-04)[/C][/ROW]
[ROW][C]Group;Wealth
[/C][C]0.218[/C][C]0.1481[/C][C]0.1254[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0.002)[/C][C](0.0021)[/C][/ROW]
[ROW][C]Trades;Dividends[/C][C]0.3472[/C][C]0.4191[/C][C]0.3349[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Trades;Wealth
[/C][C]0.5159[/C][C]0.3575[/C][C]0.2586[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Dividends;Wealth
[/C][C]0.4423[/C][C]0.4309[/C][C]0.3396[/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=113629&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=113629&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
pairPearson rSpearman rhoKendall tau
Group;Trades0.15860.15830.1344
p-value(0.001)(0.001)(0.001)
Group;Dividends0.14740.17430.1476
p-value(0.0022)(3e-04)(3e-04)
Group;Wealth 0.2180.14810.1254
p-value(0)(0.002)(0.0021)
Trades;Dividends0.34720.41910.3349
p-value(0)(0)(0)
Trades;Wealth 0.51590.35750.2586
p-value(0)(0)(0)
Dividends;Wealth 0.44230.43090.3396
p-value(0)(0)(0)



Parameters (Session):
par1 = pearson ;
Parameters (R input):
par1 = pearson ;
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')