Free Statistics

of Irreproducible Research!

Author's title

Author*Unverified author*
R Software Module--
Title produced by softwareKendall tau Correlation Matrix
Date of computationTue, 11 Dec 2012 07:19:33 -0500
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2012/Dec/11/t13552283983tbb82cgtepmx7q.htm/, Retrieved Fri, 29 Mar 2024 04:41:00 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=198475, Retrieved Fri, 29 Mar 2024 04:41:00 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact91
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] [] [2011-12-12 20:54:53] [bdca8f3e7c3554be8c1291e54f61d441]
-  M        [Kendall tau Correlation Matrix] [WS10, 1] [2012-12-11 12:19:33] [d41d8cd98f00b204e9800998ecf8427e] [Current]
Feedback Forum

Post a new message
Dataseries X:
13	13	14	13	3	4	4
12	12	8	13	5	5	5
15	10	12	16	6	1	9
12	9	7	12	6	9	11
10	10	10	11	5	19	3
12	12	7	12	3	11	4
15	13	16	18	8	3	5
9	12	11	11	4	5	7
12	12	14	14	4	8	8
11	6	6	9	4	9	9
11	5	16	14	6	11	10
11	12	11	12	6	1	5
15	11	16	11	5	4	4
7	14	12	12	4	5	3
11	14	7	13	6	6	6
11	12	13	11	4	8	7
10	12	11	12	6	9	9
14	11	15	16	6	4	18
10	11	7	9	4	5	8
6	7	9	11	4	8	3
11	9	7	13	2	13	5
15	11	14	15	7	4	8
11	11	15	10	5	15	7
12	12	7	11	4	3	9
14	12	15	13	6	6	4
15	11	17	16	6	9	6
9	11	15	15	7	19	8
13	8	14	14	5	4	7
13	9	14	14	6	15	4
16	12	8	14	4	4	6
13	10	8	8	4	7	12
12	10	14	13	7	4	3
14	12	14	15	7	9	5
11	8	8	13	4	8	7
9	12	11	11	4	3	9
16	11	16	15	6	13	8
12	12	10	15	6	5	7
10	7	8	9	5	9	4
13	11	14	13	6	11	5
16	11	16	16	7	13	12
14	12	13	13	6	5	15
15	9	5	11	3	7	3
5	15	8	12	3	6	5
8	11	10	12	4	4	13
11	11	8	12	6	17	8
16	11	13	14	7	6	9
17	11	15	14	5	1	5
9	15	6	8	4	9	13
9	11	12	13	5	19	4
13	12	16	16	6	13	5
10	12	5	13	6	18	7
6	9	15	11	6	6	8
12	12	12	14	5	5	9
8	12	8	13	4	3	11
14	13	13	13	5	7	4
12	11	14	13	5	8	6
11	9	12	12	4	9	8
16	9	16	16	6	13	10
8	11	10	15	2	12	4
15	11	15	15	8	2	4
7	12	8	12	3	4	2
16	12	16	14	6	6	12
14	9	19	12	6	8	11
16	11	14	15	6	9	4
9	9	6	12	5	10	7
14	12	13	13	5	9	7
11	12	15	12	6	3	9
13	12	7	12	5	5	19
15	12	13	13	6	6	3
5	14	4	5	2	2	5
15	11	14	13	5	3	3
13	12	13	13	5	4	11
11	11	11	14	5	2	5
11	6	14	17	6	11	6
12	10	12	13	6	8	8
12	12	15	13	6	11	9
12	13	14	12	5	17	11
12	8	13	13	5	4	7
14	12	8	14	4	5	4
6	12	6	11	2	8	5
7	12	7	12	4	9	7
14	6	13	12	6	4	11
14	11	13	16	6	6	13
10	10	11	12	5	7	3
13	12	5	12	3	9	5
12	13	12	12	6	11	7
9	11	8	10	4	12	8
12	7	11	15	5	9	11
16	11	14	15	8	4	12
10	11	9	12	4	3	8




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time3 seconds
R Server'Sir Ronald Aylmer Fisher' @ fisher.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 & 3 seconds \tabularnewline
R Server & 'Sir Ronald Aylmer Fisher' @ fisher.wessa.net \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=198475&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]'Sir Ronald Aylmer Fisher' @ fisher.wessa.net[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=198475&T=0

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







Correlations for all pairs of data series (method=pearson)
KansOverwinningGeboekteOverwinningGevoelEigenGevoelBeste2deBeste3debeste
KansOverwinning1-0.0740.5060.5350.532-0.1260.15
GeboekteOverwinning-0.0741-0.1-0.076-0.113-0.149-0.051
Gevoel0.506-0.110.5610.630.0130.082
EigenGevoel0.535-0.0760.56110.550.0310.047
Beste0.532-0.1130.630.5510.0470.214
2deBeste-0.126-0.1490.0130.0310.0471-0.063
3debeste0.15-0.0510.0820.0470.214-0.0631

\begin{tabular}{lllllllll}
\hline
Correlations for all pairs of data series (method=pearson) \tabularnewline
  & KansOverwinning & GeboekteOverwinning & Gevoel & EigenGevoel & Beste & 2deBeste & 3debeste \tabularnewline
KansOverwinning & 1 & -0.074 & 0.506 & 0.535 & 0.532 & -0.126 & 0.15 \tabularnewline
GeboekteOverwinning & -0.074 & 1 & -0.1 & -0.076 & -0.113 & -0.149 & -0.051 \tabularnewline
Gevoel & 0.506 & -0.1 & 1 & 0.561 & 0.63 & 0.013 & 0.082 \tabularnewline
EigenGevoel & 0.535 & -0.076 & 0.561 & 1 & 0.55 & 0.031 & 0.047 \tabularnewline
Beste & 0.532 & -0.113 & 0.63 & 0.55 & 1 & 0.047 & 0.214 \tabularnewline
2deBeste & -0.126 & -0.149 & 0.013 & 0.031 & 0.047 & 1 & -0.063 \tabularnewline
3debeste & 0.15 & -0.051 & 0.082 & 0.047 & 0.214 & -0.063 & 1 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=198475&T=1

[TABLE]
[ROW][C]Correlations for all pairs of data series (method=pearson)[/C][/ROW]
[ROW][C] [/C][C]KansOverwinning[/C][C]GeboekteOverwinning[/C][C]Gevoel[/C][C]EigenGevoel[/C][C]Beste[/C][C]2deBeste[/C][C]3debeste[/C][/ROW]
[ROW][C]KansOverwinning[/C][C]1[/C][C]-0.074[/C][C]0.506[/C][C]0.535[/C][C]0.532[/C][C]-0.126[/C][C]0.15[/C][/ROW]
[ROW][C]GeboekteOverwinning[/C][C]-0.074[/C][C]1[/C][C]-0.1[/C][C]-0.076[/C][C]-0.113[/C][C]-0.149[/C][C]-0.051[/C][/ROW]
[ROW][C]Gevoel[/C][C]0.506[/C][C]-0.1[/C][C]1[/C][C]0.561[/C][C]0.63[/C][C]0.013[/C][C]0.082[/C][/ROW]
[ROW][C]EigenGevoel[/C][C]0.535[/C][C]-0.076[/C][C]0.561[/C][C]1[/C][C]0.55[/C][C]0.031[/C][C]0.047[/C][/ROW]
[ROW][C]Beste[/C][C]0.532[/C][C]-0.113[/C][C]0.63[/C][C]0.55[/C][C]1[/C][C]0.047[/C][C]0.214[/C][/ROW]
[ROW][C]2deBeste[/C][C]-0.126[/C][C]-0.149[/C][C]0.013[/C][C]0.031[/C][C]0.047[/C][C]1[/C][C]-0.063[/C][/ROW]
[ROW][C]3debeste[/C][C]0.15[/C][C]-0.051[/C][C]0.082[/C][C]0.047[/C][C]0.214[/C][C]-0.063[/C][C]1[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=198475&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=198475&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)
KansOverwinningGeboekteOverwinningGevoelEigenGevoelBeste2deBeste3debeste
KansOverwinning1-0.0740.5060.5350.532-0.1260.15
GeboekteOverwinning-0.0741-0.1-0.076-0.113-0.149-0.051
Gevoel0.506-0.110.5610.630.0130.082
EigenGevoel0.535-0.0760.56110.550.0310.047
Beste0.532-0.1130.630.5510.0470.214
2deBeste-0.126-0.1490.0130.0310.0471-0.063
3debeste0.15-0.0510.0820.0470.214-0.0631







Correlations for all pairs of data series with p-values
pairPearson rSpearman rhoKendall tau
KansOverwinning;GeboekteOverwinning-0.0743-0.0627-0.0517
p-value(0.4864)(0.557)(0.5237)
KansOverwinning;Gevoel0.50620.52350.4006
p-value(0)(0)(0)
KansOverwinning;EigenGevoel0.53520.56640.444
p-value(0)(0)(0)
KansOverwinning;Beste0.53210.49490.4055
p-value(0)(0)(0)
KansOverwinning;2deBeste-0.1264-0.1487-0.1192
p-value(0.2353)(0.1619)(0.124)
KansOverwinning;3debeste0.15020.09470.0689
p-value(0.1577)(0.3747)(0.3771)
GeboekteOverwinning;Gevoel-0.1004-0.1195-0.0909
p-value(0.3463)(0.262)(0.2603)
GeboekteOverwinning;EigenGevoel-0.0759-0.0665-0.0602
p-value(0.4769)(0.5334)(0.4668)
GeboekteOverwinning;Beste-0.1133-0.1465-0.116
p-value(0.2879)(0.1683)(0.1725)
GeboekteOverwinning;2deBeste-0.1487-0.1938-0.1412
p-value(0.162)(0.0672)(0.0794)
GeboekteOverwinning;3debeste-0.0515-0.0712-0.0508
p-value(0.6298)(0.5047)(0.5309)
Gevoel;EigenGevoel0.56150.54010.4337
p-value(0)(0)(0)
Gevoel;Beste0.62960.62920.5114
p-value(0)(0)(0)
Gevoel;2deBeste0.01290.01-0.0041
p-value(0.9039)(0.9256)(0.9578)
Gevoel;3debeste0.08150.08470.0652
p-value(0.4451)(0.4271)(0.401)
EigenGevoel;Beste0.55040.55620.4484
p-value(0)(0)(0)
EigenGevoel;2deBeste0.031-7e-04-0.0031
p-value(0.7717)(0.9951)(0.9688)
EigenGevoel;3debeste0.04730.05180.04
p-value(0.6582)(0.628)(0.6151)
Beste;2deBeste0.0470.06350.0476
p-value(0.6603)(0.5521)(0.5575)
Beste;3debeste0.21430.21560.1633
p-value(0.0426)(0.0413)(0.0458)
2deBeste;3debeste-0.0631-0.0118-0.0085
p-value(0.5549)(0.9119)(0.9129)

\begin{tabular}{lllllllll}
\hline
Correlations for all pairs of data series with p-values \tabularnewline
pair & Pearson r & Spearman rho & Kendall tau \tabularnewline
KansOverwinning;GeboekteOverwinning & -0.0743 & -0.0627 & -0.0517 \tabularnewline
p-value & (0.4864) & (0.557) & (0.5237) \tabularnewline
KansOverwinning;Gevoel & 0.5062 & 0.5235 & 0.4006 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
KansOverwinning;EigenGevoel & 0.5352 & 0.5664 & 0.444 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
KansOverwinning;Beste & 0.5321 & 0.4949 & 0.4055 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
KansOverwinning;2deBeste & -0.1264 & -0.1487 & -0.1192 \tabularnewline
p-value & (0.2353) & (0.1619) & (0.124) \tabularnewline
KansOverwinning;3debeste & 0.1502 & 0.0947 & 0.0689 \tabularnewline
p-value & (0.1577) & (0.3747) & (0.3771) \tabularnewline
GeboekteOverwinning;Gevoel & -0.1004 & -0.1195 & -0.0909 \tabularnewline
p-value & (0.3463) & (0.262) & (0.2603) \tabularnewline
GeboekteOverwinning;EigenGevoel & -0.0759 & -0.0665 & -0.0602 \tabularnewline
p-value & (0.4769) & (0.5334) & (0.4668) \tabularnewline
GeboekteOverwinning;Beste & -0.1133 & -0.1465 & -0.116 \tabularnewline
p-value & (0.2879) & (0.1683) & (0.1725) \tabularnewline
GeboekteOverwinning;2deBeste & -0.1487 & -0.1938 & -0.1412 \tabularnewline
p-value & (0.162) & (0.0672) & (0.0794) \tabularnewline
GeboekteOverwinning;3debeste & -0.0515 & -0.0712 & -0.0508 \tabularnewline
p-value & (0.6298) & (0.5047) & (0.5309) \tabularnewline
Gevoel;EigenGevoel & 0.5615 & 0.5401 & 0.4337 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Gevoel;Beste & 0.6296 & 0.6292 & 0.5114 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
Gevoel;2deBeste & 0.0129 & 0.01 & -0.0041 \tabularnewline
p-value & (0.9039) & (0.9256) & (0.9578) \tabularnewline
Gevoel;3debeste & 0.0815 & 0.0847 & 0.0652 \tabularnewline
p-value & (0.4451) & (0.4271) & (0.401) \tabularnewline
EigenGevoel;Beste & 0.5504 & 0.5562 & 0.4484 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
EigenGevoel;2deBeste & 0.031 & -7e-04 & -0.0031 \tabularnewline
p-value & (0.7717) & (0.9951) & (0.9688) \tabularnewline
EigenGevoel;3debeste & 0.0473 & 0.0518 & 0.04 \tabularnewline
p-value & (0.6582) & (0.628) & (0.6151) \tabularnewline
Beste;2deBeste & 0.047 & 0.0635 & 0.0476 \tabularnewline
p-value & (0.6603) & (0.5521) & (0.5575) \tabularnewline
Beste;3debeste & 0.2143 & 0.2156 & 0.1633 \tabularnewline
p-value & (0.0426) & (0.0413) & (0.0458) \tabularnewline
2deBeste;3debeste & -0.0631 & -0.0118 & -0.0085 \tabularnewline
p-value & (0.5549) & (0.9119) & (0.9129) \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=198475&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]KansOverwinning;GeboekteOverwinning[/C][C]-0.0743[/C][C]-0.0627[/C][C]-0.0517[/C][/ROW]
[ROW][C]p-value[/C][C](0.4864)[/C][C](0.557)[/C][C](0.5237)[/C][/ROW]
[ROW][C]KansOverwinning;Gevoel[/C][C]0.5062[/C][C]0.5235[/C][C]0.4006[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]KansOverwinning;EigenGevoel[/C][C]0.5352[/C][C]0.5664[/C][C]0.444[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]KansOverwinning;Beste[/C][C]0.5321[/C][C]0.4949[/C][C]0.4055[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]KansOverwinning;2deBeste[/C][C]-0.1264[/C][C]-0.1487[/C][C]-0.1192[/C][/ROW]
[ROW][C]p-value[/C][C](0.2353)[/C][C](0.1619)[/C][C](0.124)[/C][/ROW]
[ROW][C]KansOverwinning;3debeste[/C][C]0.1502[/C][C]0.0947[/C][C]0.0689[/C][/ROW]
[ROW][C]p-value[/C][C](0.1577)[/C][C](0.3747)[/C][C](0.3771)[/C][/ROW]
[ROW][C]GeboekteOverwinning;Gevoel[/C][C]-0.1004[/C][C]-0.1195[/C][C]-0.0909[/C][/ROW]
[ROW][C]p-value[/C][C](0.3463)[/C][C](0.262)[/C][C](0.2603)[/C][/ROW]
[ROW][C]GeboekteOverwinning;EigenGevoel[/C][C]-0.0759[/C][C]-0.0665[/C][C]-0.0602[/C][/ROW]
[ROW][C]p-value[/C][C](0.4769)[/C][C](0.5334)[/C][C](0.4668)[/C][/ROW]
[ROW][C]GeboekteOverwinning;Beste[/C][C]-0.1133[/C][C]-0.1465[/C][C]-0.116[/C][/ROW]
[ROW][C]p-value[/C][C](0.2879)[/C][C](0.1683)[/C][C](0.1725)[/C][/ROW]
[ROW][C]GeboekteOverwinning;2deBeste[/C][C]-0.1487[/C][C]-0.1938[/C][C]-0.1412[/C][/ROW]
[ROW][C]p-value[/C][C](0.162)[/C][C](0.0672)[/C][C](0.0794)[/C][/ROW]
[ROW][C]GeboekteOverwinning;3debeste[/C][C]-0.0515[/C][C]-0.0712[/C][C]-0.0508[/C][/ROW]
[ROW][C]p-value[/C][C](0.6298)[/C][C](0.5047)[/C][C](0.5309)[/C][/ROW]
[ROW][C]Gevoel;EigenGevoel[/C][C]0.5615[/C][C]0.5401[/C][C]0.4337[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Gevoel;Beste[/C][C]0.6296[/C][C]0.6292[/C][C]0.5114[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]Gevoel;2deBeste[/C][C]0.0129[/C][C]0.01[/C][C]-0.0041[/C][/ROW]
[ROW][C]p-value[/C][C](0.9039)[/C][C](0.9256)[/C][C](0.9578)[/C][/ROW]
[ROW][C]Gevoel;3debeste[/C][C]0.0815[/C][C]0.0847[/C][C]0.0652[/C][/ROW]
[ROW][C]p-value[/C][C](0.4451)[/C][C](0.4271)[/C][C](0.401)[/C][/ROW]
[ROW][C]EigenGevoel;Beste[/C][C]0.5504[/C][C]0.5562[/C][C]0.4484[/C][/ROW]
[ROW][C]p-value[/C][C](0)[/C][C](0)[/C][C](0)[/C][/ROW]
[ROW][C]EigenGevoel;2deBeste[/C][C]0.031[/C][C]-7e-04[/C][C]-0.0031[/C][/ROW]
[ROW][C]p-value[/C][C](0.7717)[/C][C](0.9951)[/C][C](0.9688)[/C][/ROW]
[ROW][C]EigenGevoel;3debeste[/C][C]0.0473[/C][C]0.0518[/C][C]0.04[/C][/ROW]
[ROW][C]p-value[/C][C](0.6582)[/C][C](0.628)[/C][C](0.6151)[/C][/ROW]
[ROW][C]Beste;2deBeste[/C][C]0.047[/C][C]0.0635[/C][C]0.0476[/C][/ROW]
[ROW][C]p-value[/C][C](0.6603)[/C][C](0.5521)[/C][C](0.5575)[/C][/ROW]
[ROW][C]Beste;3debeste[/C][C]0.2143[/C][C]0.2156[/C][C]0.1633[/C][/ROW]
[ROW][C]p-value[/C][C](0.0426)[/C][C](0.0413)[/C][C](0.0458)[/C][/ROW]
[ROW][C]2deBeste;3debeste[/C][C]-0.0631[/C][C]-0.0118[/C][C]-0.0085[/C][/ROW]
[ROW][C]p-value[/C][C](0.5549)[/C][C](0.9119)[/C][C](0.9129)[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=198475&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=198475&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
KansOverwinning;GeboekteOverwinning-0.0743-0.0627-0.0517
p-value(0.4864)(0.557)(0.5237)
KansOverwinning;Gevoel0.50620.52350.4006
p-value(0)(0)(0)
KansOverwinning;EigenGevoel0.53520.56640.444
p-value(0)(0)(0)
KansOverwinning;Beste0.53210.49490.4055
p-value(0)(0)(0)
KansOverwinning;2deBeste-0.1264-0.1487-0.1192
p-value(0.2353)(0.1619)(0.124)
KansOverwinning;3debeste0.15020.09470.0689
p-value(0.1577)(0.3747)(0.3771)
GeboekteOverwinning;Gevoel-0.1004-0.1195-0.0909
p-value(0.3463)(0.262)(0.2603)
GeboekteOverwinning;EigenGevoel-0.0759-0.0665-0.0602
p-value(0.4769)(0.5334)(0.4668)
GeboekteOverwinning;Beste-0.1133-0.1465-0.116
p-value(0.2879)(0.1683)(0.1725)
GeboekteOverwinning;2deBeste-0.1487-0.1938-0.1412
p-value(0.162)(0.0672)(0.0794)
GeboekteOverwinning;3debeste-0.0515-0.0712-0.0508
p-value(0.6298)(0.5047)(0.5309)
Gevoel;EigenGevoel0.56150.54010.4337
p-value(0)(0)(0)
Gevoel;Beste0.62960.62920.5114
p-value(0)(0)(0)
Gevoel;2deBeste0.01290.01-0.0041
p-value(0.9039)(0.9256)(0.9578)
Gevoel;3debeste0.08150.08470.0652
p-value(0.4451)(0.4271)(0.401)
EigenGevoel;Beste0.55040.55620.4484
p-value(0)(0)(0)
EigenGevoel;2deBeste0.031-7e-04-0.0031
p-value(0.7717)(0.9951)(0.9688)
EigenGevoel;3debeste0.04730.05180.04
p-value(0.6582)(0.628)(0.6151)
Beste;2deBeste0.0470.06350.0476
p-value(0.6603)(0.5521)(0.5575)
Beste;3debeste0.21430.21560.1633
p-value(0.0426)(0.0413)(0.0458)
2deBeste;3debeste-0.0631-0.0118-0.0085
p-value(0.5549)(0.9119)(0.9129)



Parameters (Session):
par1 = pearson ;
Parameters (R input):
par1 = pearson ; par2 = ; par3 = ; par4 = ; par5 = ; par6 = ; par7 = ; par8 = ; par9 = ; par10 = ; par11 = ; par12 = ; par13 = ; par14 = ; par15 = ; par16 = ; par17 = ; par18 = ; par19 = ; par20 = ;
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')