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

Wed, 14 Dec 2011 09:29:42 -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/14/t1323872998ugwy9z6tchheff2.htm/, Retrieved Wed, 01 May 2024 22:35:55 +0000

Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=154997, Retrieved Wed, 01 May 2024 22:35:55 +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 17:44:33] [b98453cac15ba1066b407e146608df68]
- RMPD    [Kendall tau Correlation Matrix] [Pearson Correlation] [2011-12-14 14:29:42] [050dc696fa22882d0c3b1ebe5a70a85e] [Current]
-    D      [Kendall tau Correlation Matrix] [pearson corr. ] [2011-12-23 14:22:47] [7ead21d528290ed5f4bbc64b680f15e5] 
-    D        [Kendall tau Correlation Matrix] [pearson cor, fout] [2011-12-23 14:41:41] [7ead21d528290ed5f4bbc64b680f15e5] 

Feedback Forum

Post a new message

Dataseries X:

Download CSV

Histogram

Boxplots

127476	20	17	59	18158
130358	38	17	50	30461
7215	0	0	0	1423
112861	49	22	51	25629
210171	74	30	112	48758
393802	104	31	118	129230
117604	37	19	59	27376
126029	53	25	90	26706
99729	42	30	50	26505
256310	62	26	79	49801
113066	50	20	49	46580
156212	65	25	74	48352
69952	28	15	32	13899
152673	48	22	82	39342
125841	42	12	43	27465
125769	47	19	65	55211
123467	71	28	111	74098
56232	0	12	36	13497
108244	50	28	89	38338
22762	12	13	28	52505
48554	16	14	35	10663
178697	76	27	78	74484
140857	29	25	67	28895
93773	38	30	61	32827
133398	50	21	58	36188
113933	33	17	49	28173
144781	45	22	77	54926
140711	59	28	71	38900
283337	49	25	82	88530
158146	40	16	53	35482
123344	40	23	71	26730
157640	51	20	58	29806
91279	41	11	25	41799
189374	73	20	59	54289
167915	43	21	77	36805
0	0	0	0	0
175403	46	27	75	33146
92342	44	14	39	23333
100023	31	29	83	47686
178277	71	31	123	77783
145062	61	19	67	36042
110980	28	30	105	34541
86039	21	23	76	75620
120821	42	20	54	60610
95535	44	22	82	55041
109894	34	19	57	32087
61554	15	32	57	16356
156520	46	18	72	40161
159121	43	26	94	55459
129362	47	25	72	36679
48188	12	22	39	22346
95461	46	19	60	27377
229864	56	24	84	50273
180317	41	26	69	32104
150640	48	27	102	27016
104416	30	10	28	19715
165098	44	26	65	33629
63205	25	23	67	27084
100056	42	21	80	32352
137214	28	34	79	51845
99630	33	29	107	26591
84557	32	18	57	29677
91199	28	16	44	54237
83419	31	23	59	20284
101723	13	22	80	22741
94982	38	29	89	34178
129700	39	31	115	69551
110708	68	21	59	29653
81518	32	21	66	38071
31970	5	21	42	4157
192268	53	15	35	28321
87611	33	9	3	40195
77890	48	21	68	48158
83261	36	18	38	13310
116290	52	31	107	78474
56544	0	25	73	6386
116173	52	24	80	31588
111488	45	22	69	61254
60138	16	21	46	21152
73422	33	26	52	41272
67751	48	22	58	34165
213351	33	26	85	37054
51185	24	20	13	12368
97181	37	25	61	23168
45100	17	19	49	16380
115801	32	22	47	41242
185664	55	25	93	48450
71960	39	22	65	20790
76441	29	21	64	34585
103613	26	20	64	35672
98707	37	23	57	52168
126527	58	22	61	53933
136781	35	21	71	34474
105863	24	12	43	43753
38775	18	9	18	36456
179984	37	32	103	51183
164808	86	24	76	52742
19349	13	1	0	3895
146824	20	24	83	37076
108660	32	22	70	24079
43803	8	4	4	2325
47062	38	15	41	29354
110845	45	21	57	30341
92517	24	23	52	18992
58660	23	12	24	15292
27676	2	16	17	5842
98550	52	24	89	28918
43284	5	9	20	3738
0	0	0	0	0
66016	43	22	45	95352
57359	18	17	63	37478
96933	41	18	48	26839
70369	45	21	70	26783
65494	29	17	32	33392
3616	0	0	0	0
0	0	0	0	0
143931	32	20	72	25446
109894	58	26	56	59847
122973	17	26	64	28162
84336	24	20	77	33298
43410	7	1	3	2781
136250	62	24	73	37121
79015	30	14	37	22698
92937	49	26	54	27615
57586	3	12	32	32689
19764	10	2	4	5752
105757	42	16	55	23164
97213	18	22	81	20304
113402	40	28	90	34409
11796	1	2	1	0
7627	0	0	0	0
121085	29	17	38	92538
6836	0	1	0	0
139563	46	17	36	46037
5118	5	0	0	0
40248	8	4	7	5444
0	0	0	0	0
95079	21	25	75	23924
80750	21	26	52	52230
7131	0	0	0	0
4194	0	0	0	0
60378	15	15	45	8019
96971	40	18	60	34542
83484	17	19	48	21157
	17	13	10
1	1	36	35	18	14	11
1	0	30	27	18	11	12
1	1	39	40	12	12	15
1	0	35	37	16	12	15
1	0	38	36	10	8	14
1	1	31	38	14	11	16
1	1	34	39	18	14	15
1	0	38	41	18	14	15
1	0	34	27	16	12	13
1	1	39	30	17	9	12
1	1	37	37	16	13	17
1	1	34	31	16	11	13
1	0	28	31	13	12	15
1	0	37	27	16	12	13
1	0	33	36	16	12	15
1	1	35	37	16	12	15
1	0	37	33	15	12	16
1	1	32	34	15	11	15
1	1	33	31	16	10	14
1	0	38	39	14	9	15
1	1	33	34	16	12	14
1	1	29	32	16	12	13
1	1	33	33	15	12	7
1	1	31	36	12	9	17
1	1	36	32	17	15	13
1	1	35	41	16	12	15
1	1	32	28	15	12	14
1	1	29	30	13	12	13
1	1	39	36	16	10	16
1	1	37	35	16	13	12
1	1	35	31	16	9	14
1	0	37	34	16	12	17
1	0	32	36	14	10	15
1	1	38	36	16	14	17
1	0	37	35	16	11	12
1	1	36	37	20	15	16
1	0	32	28	15	11	11
1	1	33	39	16	11	15
1	0	40	32	13	12	9
1	1	38	35	17	12	16
1	0	41	39	16	12	15
1	0	36	35	16	11	10
1	1	43	42	12	7	10
1	1	30	34	16	12	15
1	1	31	33	16	14	11
1	1	32	41	17	11	13
1	1	37	34	12	10	18
1	0	37	32	18	13	16
1	1	33	40	14	13	14
1	1	34	40	14	8	14
1	1	33	35	13	11	14
1	1	38	36	16	12	14
1	0	33	37	13	11	12
1	1	31	27	16	13	14
1	1	38	39	13	12	15
1	1	37	38	16	14	15
1	1	36	31	15	13	15
1	1	31	33	16	15	13
1	0	39	32	15	10	17
1	1	44	39	17	11	17
1	1	33	36	15	9	19
1	1	35	33	12	11	15
1	0	32	33	16	10	13
1	0	28	32	10	11	9
1	1	40	37	16	8	15
1	0	27	30	12	11	15
1	0	37	38	14	12	15
1	1	32	29	15	12	16
1	0	28	22	13	9	11
1	0	34	35	15	11	14
1	1	30	35	11	10	11
1	1	35	34	12	8	15
1	0	31	35	11	9	13
1	1	32	34	16	8	15
1	0	30	37	15	9	16
1	1	30	35	17	15	14
1	0	31	23	16	11	15
1	1	40	31	10	8	16
1	1	32	27	18	13	16
1	0	36	36	13	12	11
1	0	32	31	16	12	12
1	0	35	32	13	9	9
1	1	38	39	10	7	16
1	1	42	37	15	13	13
1	0	34	38	16	9	16
1	1	35	39	16	6	12
1	1	38	34	14	8	9
1	1	33	31	10	8	13
1	1	32	37	13	6	14
1	1	33	36	15	9	19
1	1	34	32	16	11	13
1	1	32	38	12	8	12
0	0	27	26	13	10	10
0	0	31	26	12	8	14
0	0	38	33	17	14	16
0	1	34	39	15	10	10
0	0	24	30	10	8	11
0	0	30	33	14	11	14
0	1	26	25	11	12	12
0	1	34	38	13	12	9
0	0	27	37	16	12	9
0	0	37	31	12	5	11
0	1	36	37	16	12	16
0	0	41	35	12	10	9
0	1	29	25	9	7	13
0	1	36	28	12	12	16
0	0	32	35	15	11	13
0	1	37	33	12	8	9
0	0	30	30	12	9	12
0	1	31	31	14	10	16
0	1	38	37	12	9	11
0	1	36	36	16	12	14
0	0	35	30	11	6	13
0	0	31	36	19	15	15
0	0	38	32	15	12	14
0	1	22	28	8	12	16
0	1	32	36	16	12	13
0	0	36	34	17	11	14
0	1	39	31	12	7	15
0	0	28	28	11	7	13
0	0	32	36	11	5	11
0	1	32	36	14	12	11
0	1	38	40	16	12	14
0	1	32	33	12	3	15
0	1	35	37	16	11	11
0	1	32	32	13	10	15
0	0	37	38	15	12	12
0	1	34	31	16	9	14
0	1	33	37	16	12	14
0	0	33	33	14	9	8
0	0	30	30	16	12	9
0	0	24	30	14	10	15
0	0	34	31	11	9	17
0	0	34	32	12	12	13
0	1	33	34	15	8	15
0	1	34	36	15	11	15
0	1	35	37	16	11	14
0	0	35	36	16	12	16
0	0	36	33	11	10	13
0	0	34	33	15	10	16
0	1	34	33	12	12	9
0	0	41	44	12	12	16
0	0	32	39	15	11	11
0	0	30	32	15	8	10
0	1	35	35	16	12	11
0	0	28	25	14	10	15
0	1	33	35	17	11	17
0	1	39	34	14	10	14
0	0	36	35	13	8	8
0	1	36	39	15	12	15
0	0	35	33	13	12	11
0	0	38	36	14	10	16
0	1	33	32	15	12	10
0	0	31	32	12	9	15
0	1	32	36	8	6	16
0	0	31	32	14	10	19
0	0	33	34	14	9	12
0	0	34	33	11	9	8
0	0	34	35	12	9	11
0	1	34	30	13	6	14
0	0	33	38	10	10	9
0	0	32	34	16	6	15
0	1	41	33	18	14	13
0	1	34	32	13	10	16
0	0	36	31	11	10	11
0	0	37	30	4	6	12
0	0	36	27	13	12	13
0	1	29	31	16	12	10
0	0	37	30	10	7	11
0	0	27	32	12	8	12
0	0	35	35	12	11	8
0	0	28	28	10	3	12
0	0	35	33	13	6	12
0	0	29	35	12	8	11
0	0	32	35	14	9	13
0	1	36	32	10	9	14
0	1	19	21	12	8	10
0	1	21	20	12	9	12
0	0	31	34	11	7	15
0	0	33	32	10	7	13
0	1	36	34	12	6	13
0	1	33	32	16	9	13
0	0	37	33	12	10	12
0	0	34	33	14	11	12
0	0	35	37	16	12	9
0	1	31	32	14	8	9
0	1	37	34	13	11	15
0	1	35	30	4	3	10
0	1	27	30	15	11	14
0	0	34	38	11	12	15
0	0	40	36	11	7	7
0	0	29	32	14	9	14
0	0	38	34	15	12	8
0	1	34	33	14	8	10
0	0	21	27	13	11	13
0	0	36	32	11	8	13
0	1	38	34	15	10	13
0	0	30	29	11	8	8
0	0	35	35	13	7	12
0	1	30	27	13	8	13
0	1	36	33	16	10	12
0	0	34	38	13	8	10
0	1	35	36	16	12	13
0	0	34	33	16	14	12
0	0	32	39	12	7	9
0	1	33	29	7	6	15
0	0	33	32	16	11	13
0	1	26	34	5	4	13
0	0	35	38	16	9	13
0	0	21	17	4	5	15
0	0	38	35	12	9	15
0	0	35	32	15	11	14
0	1	33	34	14	12	15
0	0	37	36	11	9	11
0	0	38	31	16	12	15
0	1	34	35	15	10	14
0	0	27	29	12	9	13
0	1	16	22	6	6	12
0	0	40	41	16	10	16
0	0	36	36	10	9	16
0	1	42	42	15	13	9
0	1	30	33	14	12	14

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

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

Correlations for all pairs of data series (method=pearson)
	time	Bloggings	Reviews	Feedbackm	Characters
time	1	0.708	0.31	0.821	0.878
Bloggings	0.708	1	0.395	0.531	0.674
Reviews	0.31	0.395	1	0.455	0.305
Feedbackm	0.821	0.531	0.455	1	0.78
Characters	0.878	0.674	0.305	0.78	1

\begin{tabular}{lllllllll}
\hline
Correlations for all pairs of data series (method=pearson) \tabularnewline
  & time & Bloggings & Reviews & Feedbackm & Characters \tabularnewline
time & 1 & 0.708 & 0.31 & 0.821 & 0.878 \tabularnewline
Bloggings & 0.708 & 1 & 0.395 & 0.531 & 0.674 \tabularnewline
Reviews & 0.31 & 0.395 & 1 & 0.455 & 0.305 \tabularnewline
Feedbackm & 0.821 & 0.531 & 0.455 & 1 & 0.78 \tabularnewline
Characters & 0.878 & 0.674 & 0.305 & 0.78 & 1 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=154997&T=1

[TABLE]
[ROW][C]Correlations for all pairs of data series (method=pearson)[/C][/ROW]
[ROW][C] [/C][C]time[/C][C]Bloggings[/C][C]Reviews[/C][C]Feedbackm[/C][C]Characters[/C][/ROW]
[ROW][C]time[/C][C]1[/C][C]0.708[/C][C]0.31[/C][C]0.821[/C][C]0.878[/C][/ROW]
[ROW][C]Bloggings[/C][C]0.708[/C][C]1[/C][C]0.395[/C][C]0.531[/C][C]0.674[/C][/ROW]
[ROW][C]Reviews[/C][C]0.31[/C][C]0.395[/C][C]1[/C][C]0.455[/C][C]0.305[/C][/ROW]
[ROW][C]Feedbackm[/C][C]0.821[/C][C]0.531[/C][C]0.455[/C][C]1[/C][C]0.78[/C][/ROW]
[ROW][C]Characters[/C][C]0.878[/C][C]0.674[/C][C]0.305[/C][C]0.78[/C][C]1[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=154997&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=154997&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)
	time	Bloggings	Reviews	Feedbackm	Characters
time	1	0.708	0.31	0.821	0.878
Bloggings	0.708	1	0.395	0.531	0.674
Reviews	0.31	0.395	1	0.455	0.305
Feedbackm	0.821	0.531	0.455	1	0.78
Characters	0.878	0.674	0.305	0.78	1

Correlations for all pairs of data series with p-values
pair	Pearson r	Spearman rho	Kendall tau
time;Bloggings	0.7078	0.596	0.454
p-value	(0)	(0)	(0)
time;Reviews	0.3104	0.0566	0.1318
p-value	(0)	(0.2795)	(3e-04)
time;Feedbackm	0.8206	0.5898	0.4249
p-value	(0)	(0)	(0)
time;Characters	0.8781	0.6463	0.4639
p-value	(0)	(0)	(0)
Bloggings;Reviews	0.3953	0.401	0.3217
p-value	(0)	(0)	(0)
Bloggings;Feedbackm	0.5312	0.4223	0.2938
p-value	(0)	(0)	(0)
Bloggings;Characters	0.6737	0.4844	0.349
p-value	(0)	(0)	(0)
Reviews;Feedbackm	0.4549	0.5303	0.384
p-value	(0)	(0)	(0)
Reviews;Characters	0.305	0.2148	0.165
p-value	(0)	(0)	(0)
Feedbackm;Characters	0.7801	0.7424	0.5652
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
time;Bloggings & 0.7078 & 0.596 & 0.454 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
time;Reviews & 0.3104 & 0.0566 & 0.1318 \tabularnewline
p-value & (0) & (0.2795) & (3e-04) \tabularnewline
time;Feedbackm & 0.8206 & 0.5898 & 0.4249 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
time;Characters & 0.8781 & 0.6463 & 0.4639 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Bloggings;Reviews & 0.3953 & 0.401 & 0.3217 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Bloggings;Feedbackm & 0.5312 & 0.4223 & 0.2938 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Bloggings;Characters & 0.6737 & 0.4844 & 0.349 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Reviews;Feedbackm & 0.4549 & 0.5303 & 0.384 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Reviews;Characters & 0.305 & 0.2148 & 0.165 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Feedbackm;Characters & 0.7801 & 0.7424 & 0.5652 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=154997&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]time;Bloggings[/C][C]0.7078[/C][C]0.596[/C][C]0.454[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]time;Reviews[/C][C]0.3104[/C][C]0.0566[/C][C]0.1318[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0.2795)[/C][C](3e-04)[/C][/ROW]
[ROW][C]time;Feedbackm[/C][C]0.8206[/C][C]0.5898[/C][C]0.4249[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]time;Characters[/C][C]0.8781[/C][C]0.6463[/C][C]0.4639[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Bloggings;Reviews[/C][C]0.3953[/C][C]0.401[/C][C]0.3217[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Bloggings;Feedbackm[/C][C]0.5312[/C][C]0.4223[/C][C]0.2938[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Bloggings;Characters[/C][C]0.6737[/C][C]0.4844[/C][C]0.349[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Reviews;Feedbackm[/C][C]0.4549[/C][C]0.5303[/C][C]0.384[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Reviews;Characters[/C][C]0.305[/C][C]0.2148[/C][C]0.165[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Feedbackm;Characters[/C][C]0.7801[/C][C]0.7424[/C][C]0.5652[/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=154997&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=154997&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
time;Bloggings	0.7078	0.596	0.454
p-value	(0)	(0)	(0)
time;Reviews	0.3104	0.0566	0.1318
p-value	(0)	(0.2795)	(3e-04)
time;Feedbackm	0.8206	0.5898	0.4249
p-value	(0)	(0)	(0)
time;Characters	0.8781	0.6463	0.4639
p-value	(0)	(0)	(0)
Bloggings;Reviews	0.3953	0.401	0.3217
p-value	(0)	(0)	(0)
Bloggings;Feedbackm	0.5312	0.4223	0.2938
p-value	(0)	(0)	(0)
Bloggings;Characters	0.6737	0.4844	0.349
p-value	(0)	(0)	(0)
Reviews;Feedbackm	0.4549	0.5303	0.384
p-value	(0)	(0)	(0)
Reviews;Characters	0.305	0.2148	0.165
p-value	(0)	(0)	(0)
Feedbackm;Characters	0.7801	0.7424	0.5652
p-value	(0)	(0)	(0)

Figure 1

PNG link

Postscript link

PDF link

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')

Free Statistics

Description of Statistical Computation

Tree of Dependent Computations

Dataset

Tables (Output of Computation)

Figures (Output of Computation)

Input Parameters & R Code