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, 16 Dec 2011 09:46:03 -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/2011/Dec/16/t1324046780uq4zlw4vx2fi4bg.htm/, Retrieved Sun, 05 May 2024 14:34:51 +0000

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

103

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] [] [2011-12-13 08:49:16] [8fcdd1f5b88bf5ac5d2a0b8a91219b89]
-   PD      [Kendall tau Correlation Matrix] [] [2011-12-16 14:46:03] [888ed98a09d01be7e0be9dfdea403736] [Current]
-    D        [Kendall tau Correlation Matrix] [] [2011-12-16 14:47:52] [8fcdd1f5b88bf5ac5d2a0b8a91219b89] 
-    D          [Kendall tau Correlation Matrix] [] [2011-12-16 14:48:52] [8fcdd1f5b88bf5ac5d2a0b8a91219b89] 

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

17140	101645	88	20	11
27570	101011	41	30	13
1423	7176	1	0	0
22996	96560	129	42	17
39992	175824	107	57	20
117105	341570	190	94	21
23789	103597	66	27	16
26706	112611	36	46	20
24266	85574	71	37	21
44418	220801	105	51	18
35232	92661	133	40	17
40909	133328	79	56	20
13294	61361	51	27	12
32387	125930	207	37	17
21233	82316	34	27	10
44332	102010	66	28	13
61056	101523	76	59	22
13497	41566	42	0	9
32334	99923	115	44	25
44339	22648	44	12	13
10288	46698	35	14	13
65622	131698	74	60	19
16563	91735	103	7	18
29011	79863	134	29	22
34553	108043	29	45	14
23517	98866	140	25	13
51009	120445	72	36	16
33416	116048	45	50	20
83305	250047	58	41	18
27142	136084	69	27	13
21399	92499	57	25	18
24874	135781	98	45	14
34988	74408	61	29	7
45549	81240	89	58	17
32755	133368	54	37	16
20760	79619	123	42	11
37636	59194	247	7	24
65461	139942	46	54	22
30080	118612	72	54	12
24094	72880	41	14	19
69008	65475	24	16	13
54968	99643	45	33	17
46090	71965	33	32	15
27507	77272	27	21	16
10672	49289	36	15	24
34029	135131	87	38	15
46300	108446	90	22	17
24760	89746	114	28	18
18779	44296	31	10	20
21280	77648	45	31	16
40662	181528	69	32	16
28987	134019	51	32	18
22827	124064	34	43	22
18513	92630	60	27	8
30594	121848	45	37	17
24006	52915	54	20	18
27913	81872	25	32	16
42744	58981	38	0	23
12934	53515	52	5	22
22574	60812	67	26	13
41385	56375	74	10	13
18653	65490	38	27	16
18472	80949	30	11	16
30976	76302	26	29	20
63339	104011	67	25	22
25568	98104	132	55	17
33747	67989	42	23	18
4154	30989	35	5	17
19474	135458	118	43	12
35130	73504	68	23	7
39067	63123	43	34	17
13310	61254	76	36	14
65892	74914	64	35	23
4143	31774	48	0	17
28579	81437	64	37	14
51776	87186	56	28	15
21152	50090	71	16	17
38084	65745	75	26	21
27717	56653	39	38	18
32928	158399	42	23	18
11342	46455	39	22	17
19499	73624	93	30	17
16380	38395	38	16	16
36874	91899	60	18	15
48259	139526	71	28	21
16734	52164	52	32	16
28207	51567	27	21	14
30143	70551	59	23	15
41369	84856	40	29	17
45833	102538	79	50	15
29156	86678	44	12	15
35944	85709	65	21	10
36278	34662	10	18	6
45588	150580	124	27	22
45097	99611	81	41	21
3895	19349	15	13	1
28394	99373	92	12	18
18632	86230	42	21	17
2325	30837	10	8	4
25139	31706	24	26	10
27975	89806	64	27	16
14483	62088	45	13	16
13127	40151	22	16	9
5839	27634	56	2	16
24069	76990	94	42	17
3738	37460	19	5	7
18625	54157	35	37	15
36341	49862	32	17	14
24548	84337	35	38	14
21792	64175	48	37	18
26263	59382	49	29	12
23686	119308	48	32	16
49303	76702	62	35	21
25659	103425	96	17	19
28904	70344	45	20	16
2781	43410	63	7	1
29236	104838	71	46	16
19546	62215	26	24	10
22818	69304	48	40	19
32689	53117	29	3	12
5752	19764	19	10	2
22197	86680	45	37	14
20055	84105	45	17	17
25272	77945	67	28	19
82206	89113	30	19	14
32073	91005	36	29	11
5444	40248	34	8	4
20154	64187	36	10	16
36944	50857	34	15	20
8019	56613	37	15	12
30884	62792	46	28	15
19540	72535	44	17	16
27114	98146	37	15	17
112285	210907	81	79	30
84786	120982	55	58	28
83123	176508	50	60	38
101193	179321	125	108	30
38361	123185	40	49	22
68504	52746	37	0	26
119182	385534	63	121	25
22807	33170	44	1	18
116174	149061	66	43	26
57635	165446	57	69	25
66198	237213	74	78	38
71701	173326	49	86	44
57793	133131	52	44	30
80444	258873	88	104	40
53855	180083	36	63	34
97668	324799	108	158	47
133824	230964	43	102	30
101481	236785	75	77	31
99645	135473	32	82	23
114789	202925	44	115	36
99052	215147	85	101	36
67654	344297	86	80	30
65553	153935	56	50	25
97500	132943	50	83	39
69112	174724	135	123	34
82753	174415	63	73	31
85323	225548	81	81	31
72654	223632	52	105	33
30727	124817	44	47	25
77873	221698	113	105	33
117478	210767	39	94	35
74007	170266	73	44	42
90183	260561	48	114	43
61542	84853	33	38	30
101494	294424	59	107	33
55813	215641	69	71	32
79215	325107	64	84	36
55461	167542	59	59	28
31081	106408	32	33	14
83122	265769	37	96	32
70106	269651	31	106	30
60578	149112	65	56	35
79892	152871	74	59	28
49810	111665	54	39	28
71570	116408	76	34	39
100708	362301	715	76	34
33032	78800	57	20	26
82875	183167	66	91	39
139077	277965	106	115	39
71595	150629	54	85	33
72260	168809	32	76	28
5950	24188	20	8	4
115762	329267	71	79	39
32551	65029	21	21	18
31701	101097	70	30	14
80670	218946	112	76	29
143558	244052	66	101	44
120733	233328	165	92	28
105195	256462	56	123	35
73107	206161	61	75	28
132068	311473	53	128	38
149193	235800	127	105	23
46821	177939	63	55	36
87011	207176	38	56	32
95260	196553	50	41	29
55183	174184	52	72	25
106671	143246	42	67	27
73511	187559	76	75	36
92945	187681	67	114	28
78664	119016	50	118	23
70054	182192	53	77	40
22618	73566	39	22	23
74011	194979	50	66	40
83737	167488	77	69	28
69094	143756	57	105	34
93133	275541	73	116	33
95536	243199	34	88	28
225920	182999	39	73	34
62133	135649	46	99	30
61370	152299	63	62	33
43836	120221	35	53	22
106117	346485	106	118	38
38692	145790	43	30	26
84651	193339	47	100	35
56622	80953	31	49	8
15986	122774	162	24	24
95364	130585	57	67	29
89691	286468	263	57	29
67267	241066	78	75	45
126846	148446	63	135	37
41140	204713	54	68	33
102860	182079	63	124	33
51715	140344	77	33	25
55801	220516	79	98	32
111813	243060	110	58	29
120293	162765	56	68	28
138599	182613	56	81	28
161647	232138	43	131	31
115929	265318	111	110	52
162901	310839	62	130	24
109825	225060	56	93	41
129838	232317	74	118	33
37510	144966	60	39	32
43750	43287	43	13	19
40652	155754	68	74	20
87771	164709	53	81	31
85872	201940	87	109	31
89275	235454	46	151	32
192565	99466	32	28	23
140867	100750	67	83	30
120662	224549	47	54	31
101338	243511	65	133	42
1168	22938	9	12	1
65567	152474	45	106	32
25162	61857	25	23	11
40735	132487	97	71	36
91413	317394	53	116	31
855	21054	2	4	0
97068	209641	52	62	24
14116	31414	22	18	8
76643	244749	144	98	33
110681	184510	60	64	40
92696	128423	89	32	38
94785	97839	42	25	24
8773	38214	52	16	8
83209	151101	98	48	35
93815	272458	99	100	43
86687	172494	52	46	43
105547	328107	125	129	41
103487	250579	106	130	38
213688	351067	95	136	45
71220	158015	40	59	31
56926	85439	43	32	28
91721	229242	128	63	31
115168	351619	142	95	40
111194	84207	73	14	30
135777	324598	128	113	37
51513	131069	61	47	30
74163	204271	73	92	35
51633	165543	148	70	32
75345	141722	64	19	27
98952	299775	97	91	31
102372	195838	50	111	31
37238	173260	37	41	21
103772	254488	50	120	39
123969	104389	105	135	41
135400	199476	46	87	32
130115	224330	52	131	39
6023	14688	0	4	0
64466	181633	48	47	30
54990	271856	91	109	37
1644	7199	0	7	0
6179	46660	7	12	5
3926	17547	3	0	1
34777	95227	70	37	32
73224	152601	36	46	24

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

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

Correlations for all pairs of data series (method=kendall)
	Total_size	Time_RFC	PR_view	Blogged	Reviewed
Total_size	1	0.617	0.238	0.606	0.582
Time_RFC	0.617	1	0.344	0.683	0.59
PR_view	0.238	0.344	1	0.289	0.282
Blogged	0.606	0.683	0.289	1	0.574
Reviewed	0.582	0.59	0.282	0.574	1

\begin{tabular}{lllllllll}
\hline
Correlations for all pairs of data series (method=kendall) \tabularnewline
  & Total_size & Time_RFC & PR_view & Blogged & Reviewed \tabularnewline
Total_size & 1 & 0.617 & 0.238 & 0.606 & 0.582 \tabularnewline
Time_RFC & 0.617 & 1 & 0.344 & 0.683 & 0.59 \tabularnewline
PR_view & 0.238 & 0.344 & 1 & 0.289 & 0.282 \tabularnewline
Blogged & 0.606 & 0.683 & 0.289 & 1 & 0.574 \tabularnewline
Reviewed & 0.582 & 0.59 & 0.282 & 0.574 & 1 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=156013&T=1

[TABLE]
[ROW][C]Correlations for all pairs of data series (method=kendall)[/C][/ROW]
[ROW][C] [/C][C]Total_size[/C][C]Time_RFC[/C][C]PR_view[/C][C]Blogged[/C][C]Reviewed[/C][/ROW]
[ROW][C]Total_size[/C][C]1[/C][C]0.617[/C][C]0.238[/C][C]0.606[/C][C]0.582[/C][/ROW]
[ROW][C]Time_RFC[/C][C]0.617[/C][C]1[/C][C]0.344[/C][C]0.683[/C][C]0.59[/C][/ROW]
[ROW][C]PR_view[/C][C]0.238[/C][C]0.344[/C][C]1[/C][C]0.289[/C][C]0.282[/C][/ROW]
[ROW][C]Blogged[/C][C]0.606[/C][C]0.683[/C][C]0.289[/C][C]1[/C][C]0.574[/C][/ROW]
[ROW][C]Reviewed[/C][C]0.582[/C][C]0.59[/C][C]0.282[/C][C]0.574[/C][C]1[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=156013&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=156013&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)
	Total_size	Time_RFC	PR_view	Blogged	Reviewed
Total_size	1	0.617	0.238	0.606	0.582
Time_RFC	0.617	1	0.344	0.683	0.59
PR_view	0.238	0.344	1	0.289	0.282
Blogged	0.606	0.683	0.289	1	0.574
Reviewed	0.582	0.59	0.282	0.574	1

Correlations for all pairs of data series with p-values
pair	Pearson r	Spearman rho	Kendall tau
Total_size;Time_RFC	0.7462	0.8118	0.6171
p-value	(0)	(0)	(0)
Total_size;PR_view	0.2065	0.346	0.2382
p-value	(4e-04)	(0)	(0)
Total_size;Blogged	0.7605	0.7962	0.6059
p-value	(0)	(0)	(0)
Total_size;Reviewed	0.7345	0.7899	0.5825
p-value	(0)	(0)	(0)
Time_RFC;PR_view	0.3903	0.489	0.3435
p-value	(0)	(0)	(0)
Time_RFC;Blogged	0.8309	0.8717	0.683
p-value	(0)	(0)	(0)
Time_RFC;Reviewed	0.758	0.7892	0.5899
p-value	(0)	(0)	(0)
PR_view;Blogged	0.2289	0.4173	0.2892
p-value	(1e-04)	(0)	(0)
PR_view;Reviewed	0.2633	0.3939	0.2823
p-value	(0)	(0)	(0)
Blogged;Reviewed	0.7623	0.7722	0.574
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
Total_size;Time_RFC & 0.7462 & 0.8118 & 0.6171 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Total_size;PR_view & 0.2065 & 0.346 & 0.2382 \tabularnewline
p-value & (4e-04) & (0) & (0) \tabularnewline
Total_size;Blogged & 0.7605 & 0.7962 & 0.6059 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Total_size;Reviewed & 0.7345 & 0.7899 & 0.5825 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Time_RFC;PR_view & 0.3903 & 0.489 & 0.3435 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Time_RFC;Blogged & 0.8309 & 0.8717 & 0.683 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Time_RFC;Reviewed & 0.758 & 0.7892 & 0.5899 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
PR_view;Blogged & 0.2289 & 0.4173 & 0.2892 \tabularnewline
p-value & (1e-04) & (0) & (0) \tabularnewline
PR_view;Reviewed & 0.2633 & 0.3939 & 0.2823 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Blogged;Reviewed & 0.7623 & 0.7722 & 0.574 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=156013&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]Total_size;Time_RFC[/C][C]0.7462[/C][C]0.8118[/C][C]0.6171[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Total_size;PR_view[/C][C]0.2065[/C][C]0.346[/C][C]0.2382[/C][/ROW]
[ROW][C]p-value[/C][C](4e-04)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Total_size;Blogged[/C][C]0.7605[/C][C]0.7962[/C][C]0.6059[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Total_size;Reviewed[/C][C]0.7345[/C][C]0.7899[/C][C]0.5825[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Time_RFC;PR_view[/C][C]0.3903[/C][C]0.489[/C][C]0.3435[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Time_RFC;Blogged[/C][C]0.8309[/C][C]0.8717[/C][C]0.683[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Time_RFC;Reviewed[/C][C]0.758[/C][C]0.7892[/C][C]0.5899[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]PR_view;Blogged[/C][C]0.2289[/C][C]0.4173[/C][C]0.2892[/C][/ROW]
[ROW][C]p-value[/C][C](1e-04)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]PR_view;Reviewed[/C][C]0.2633[/C][C]0.3939[/C][C]0.2823[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Blogged;Reviewed[/C][C]0.7623[/C][C]0.7722[/C][C]0.574[/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=156013&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=156013&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
Total_size;Time_RFC	0.7462	0.8118	0.6171
p-value	(0)	(0)	(0)
Total_size;PR_view	0.2065	0.346	0.2382
p-value	(4e-04)	(0)	(0)
Total_size;Blogged	0.7605	0.7962	0.6059
p-value	(0)	(0)	(0)
Total_size;Reviewed	0.7345	0.7899	0.5825
p-value	(0)	(0)	(0)
Time_RFC;PR_view	0.3903	0.489	0.3435
p-value	(0)	(0)	(0)
Time_RFC;Blogged	0.8309	0.8717	0.683
p-value	(0)	(0)	(0)
Time_RFC;Reviewed	0.758	0.7892	0.5899
p-value	(0)	(0)	(0)
PR_view;Blogged	0.2289	0.4173	0.2892
p-value	(1e-04)	(0)	(0)
PR_view;Reviewed	0.2633	0.3939	0.2823
p-value	(0)	(0)	(0)
Blogged;Reviewed	0.7623	0.7722	0.574
p-value	(0)	(0)	(0)

Figure 1

PNG link

Postscript link

PDF link

Parameters (Session):

par1 = 2 ; par2 = Do not include Seasonal Dummies ; par3 = No Linear Trend ;

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