Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_pairs.wasp
Title produced by softwareKendall tau Correlation Matrix
Date of computationThu, 06 Dec 2012 07:19:09 -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/06/t1354796388wf954xqsds0kffv.htm/, Retrieved Sat, 20 Apr 2024 07:44:46 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=197035, Retrieved Sat, 20 Apr 2024 07:44:46 +0000
QR Codes:

Original text written by user:
IsPrivate?No (this computation is public)
User-defined keywords
Estimated Impact99
Family? (F = Feedback message, R = changed R code, M = changed R Module, P = changed Parameters, D = changed Data)
-       [Kendall tau Correlation Matrix] [] [2012-12-06 12:19:09] [eace0511beeaae09dbb51bfebd62c02b] [Current]
Feedback Forum

Post a new message
Dataseries X:
299775	41	38	7	53	145	56
195838	39	32	5	86	101	56
173260	30	35	5	66	98	54
254488	31	33	5	67	132	89
104389	34	37	8	76	60	40
136084	35	29	6	78	38	25
199476	39	31	5	53	144	92
92499	34	36	6	80	5	18
224330	36	35	5	74	28	63
135781	37	38	4	76	84	44
74408	38	31	6	79	79	33
81240	36	34	5	54	127	84
14688	38	35	5	67	78	88
181633	39	38	6	54	60	55
271856	33	37	7	87	131	60
7199	32	33	6	58	84	66
46660	36	32	7	75	133	154
17547	38	38	6	88	150	53
133368	39	38	8	64	91	119
95227	32	32	7	57	132	41
152601	32	33	5	66	136	61
98146	31	31	5	68	124	58
79619	39	38	7	54	118	75
59194	37	39	7	56	70	33
139942	39	32	5	86	107	40
118612	41	32	4	80	119	92
72880	36	35	10	76	89	100
65475	33	37	6	69	112	112
99643	33	33	5	78	108	73
71965	34	33	5	67	52	40
77272	31	28	5	80	112	45
49289	27	32	5	54	116	60
135131	37	31	6	71	123	62
108446	34	37	5	84	125	75
89746	34	30	5	74	27	31
44296	32	33	5	71	162	77
77648	29	31	5	63	32	34
181528	36	33	5	71	64	46
134019	29	31	5	76	92	99
124064	35	33	5	69	0	17
92630	37	32	5	74	83	66
121848	34	33	7	75	41	30
52915	38	32	5	54	47	76
81872	35	33	6	52	120	146
58981	38	28	7	69	105	67
53515	37	35	7	68	79	56
60812	38	39	5	65	65	107
56375	33	34	5	75	70	58
65490	36	38	4	74	55	34
80949	38	32	5	75	39	61
76302	32	38	4	72	67	119
104011	32	30	5	67	21	42
98104	32	33	5	63	127	66
67989	34	38	7	62	152	89
30989	32	32	5	63	113	44
135458	37	32	5	76	99	66
73504	39	34	6	74	7	24
63123	29	34	4	67	141	259
61254	37	36	6	73	21	17
74914	35	34	6	70	35	64
31774	30	28	5	53	109	41
81437	38	34	7	77	133	68
87186	34	35	6	77	123	168
50090	31	35	8	52	26	43
65745	34	31	7	54	230	132
56653	35	37	5	80	166	105
158399	36	35	6	66	68	71
46455	30	27	6	73	147	112
73624	39	40	5	63	179	94
38395	35	37	5	69	61	82
91899	38	36	5	67	101	70
139526	31	38	5	54	108	57
52164	34	39	4	81	90	53
51567	38	41	6	69	114	103
70551	34	27	6	84	103	121
84856	39	30	6	80	142	62
102538	37	37	6	70	79	52
86678	34	31	7	69	88	52
85709	28	31	5	77	25	32
34662	37	27	7	54	83	62
150580	33	36	6	79	113	45
99611	37	38	5	30	118	46
19349	35	37	5	71	110	63
99373	37	33	4	73	129	75
86230	32	34	8	72	51	88
30837	33	31	8	77	93	46
31706	38	39	5	75	76	53
89806	33	34	5	69	49	37
62088	29	32	6	54	118	90
40151	33	33	4	70	38	63
27634	31	36	5	73	141	78
76990	36	32	5	54	58	25
37460	35	41	5	77	27	45
54157	32	28	5	82	91	46
49862	29	30	6	80	48	41
84337	39	36	6	80	63	144
64175	37	35	5	69	56	82
59382	35	31	6	78	144	91
119308	37	34	5	81	73	71
76702	32	36	7	76	168	63
103425	38	36	5	76	64	53
70344	37	35	6	73	97	62
43410	36	37	6	85	117	63
104838	32	28	6	66	100	32
62215	33	39	4	79	149	39
69304	40	32	5	68	187	62
53117	38	35	5	76	127	117
19764	41	39	7	71	37	34
86680	36	35	6	54	245	92
84105	43	42	9	46	87	93
77945	30	34	6	82	177	54
89113	31	33	6	74	49	144
91005	32	41	5	88	49	14
40248	32	33	6	38	73	61
64187	37	34	5	76	177	109
50857	37	32	8	86	94	38
56613	33	40	7	54	117	73
62792	34	40	5	70	60	75




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time2 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=197035&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=197035&T=0

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







Correlations for all pairs of data series (method=pearson)
Time_in_RFCConnectedSeparateagebeloningtotblogsLogin
Time_in_RFC10.110.004-0.0340.0220.02-0.08
Connected0.1110.2940.150.0080.006-0.004
Separate0.0040.29410.04-0.063-0.0240.041
age-0.0340.150.041-0.130.0250.02
beloning0.0220.008-0.063-0.131-0.09-0.074
totblogs0.020.006-0.0240.025-0.0910.415
Login-0.08-0.0040.0410.02-0.0740.4151

\begin{tabular}{lllllllll}
\hline
Correlations for all pairs of data series (method=pearson) \tabularnewline
  & Time_in_RFC & Connected & Separate & age & beloning & totblogs & Login \tabularnewline
Time_in_RFC & 1 & 0.11 & 0.004 & -0.034 & 0.022 & 0.02 & -0.08 \tabularnewline
Connected & 0.11 & 1 & 0.294 & 0.15 & 0.008 & 0.006 & -0.004 \tabularnewline
Separate & 0.004 & 0.294 & 1 & 0.04 & -0.063 & -0.024 & 0.041 \tabularnewline
age & -0.034 & 0.15 & 0.04 & 1 & -0.13 & 0.025 & 0.02 \tabularnewline
beloning & 0.022 & 0.008 & -0.063 & -0.13 & 1 & -0.09 & -0.074 \tabularnewline
totblogs & 0.02 & 0.006 & -0.024 & 0.025 & -0.09 & 1 & 0.415 \tabularnewline
Login & -0.08 & -0.004 & 0.041 & 0.02 & -0.074 & 0.415 & 1 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=197035&T=1

[TABLE]
[ROW][C]Correlations for all pairs of data series (method=pearson)[/C][/ROW]
[ROW][C] [/C][C]Time_in_RFC[/C][C]Connected[/C][C]Separate[/C][C]age[/C][C]beloning[/C][C]totblogs[/C][C]Login[/C][/ROW]
[ROW][C]Time_in_RFC[/C][C]1[/C][C]0.11[/C][C]0.004[/C][C]-0.034[/C][C]0.022[/C][C]0.02[/C][C]-0.08[/C][/ROW]
[ROW][C]Connected[/C][C]0.11[/C][C]1[/C][C]0.294[/C][C]0.15[/C][C]0.008[/C][C]0.006[/C][C]-0.004[/C][/ROW]
[ROW][C]Separate[/C][C]0.004[/C][C]0.294[/C][C]1[/C][C]0.04[/C][C]-0.063[/C][C]-0.024[/C][C]0.041[/C][/ROW]
[ROW][C]age[/C][C]-0.034[/C][C]0.15[/C][C]0.04[/C][C]1[/C][C]-0.13[/C][C]0.025[/C][C]0.02[/C][/ROW]
[ROW][C]beloning[/C][C]0.022[/C][C]0.008[/C][C]-0.063[/C][C]-0.13[/C][C]1[/C][C]-0.09[/C][C]-0.074[/C][/ROW]
[ROW][C]totblogs[/C][C]0.02[/C][C]0.006[/C][C]-0.024[/C][C]0.025[/C][C]-0.09[/C][C]1[/C][C]0.415[/C][/ROW]
[ROW][C]Login[/C][C]-0.08[/C][C]-0.004[/C][C]0.041[/C][C]0.02[/C][C]-0.074[/C][C]0.415[/C][C]1[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=197035&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=197035&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_in_RFCConnectedSeparateagebeloningtotblogsLogin
Time_in_RFC10.110.004-0.0340.0220.02-0.08
Connected0.1110.2940.150.0080.006-0.004
Separate0.0040.29410.04-0.063-0.0240.041
age-0.0340.150.041-0.130.0250.02
beloning0.0220.008-0.063-0.131-0.09-0.074
totblogs0.020.006-0.0240.025-0.0910.415
Login-0.08-0.0040.0410.02-0.0740.4151







Correlations for all pairs of data series with p-values
pairPearson rSpearman rhoKendall tau
Time_in_RFC;Connected0.10990.08550.0589
p-value(0.2362)(0.3576)(0.3631)
Time_in_RFC;Separate0.0045-0.0565-0.0389
p-value(0.9617)(0.5433)(0.5465)
Time_in_RFC;age-0.0336-0.0727-0.0574
p-value(0.7181)(0.4338)(0.4105)
Time_in_RFC;beloning0.02210.04690.0326
p-value(0.8121)(0.6142)(0.6067)
Time_in_RFC;totblogs0.0195-0.0192-0.0145
p-value(0.8338)(0.8368)(0.8161)
Time_in_RFC;Login-0.0802-0.1007-0.0622
p-value(0.3881)(0.2781)(0.3205)
Connected;Separate0.29410.25880.1919
p-value(0.0012)(0.0047)(0.0043)
Connected;age0.150.11090.0854
p-value(0.105)(0.2319)(0.2391)
Connected;beloning0.00790.03770.0259
p-value(0.9327)(0.6849)(0.694)
Connected;totblogs0.006-0.0086-0.0014
p-value(0.949)(0.9261)(0.9832)
Connected;Login-0.00370.09850.069
p-value(0.9683)(0.2885)(0.2894)
Separate;age0.040.00560.0056
p-value(0.667)(0.9521)(0.9386)
Separate;beloning-0.0625-0.0436-0.0288
p-value(0.5013)(0.6391)(0.6616)
Separate;totblogs-0.0238-0.0206-0.0133
p-value(0.7979)(0.8249)(0.837)
Separate;Login0.04140.09450.0613
p-value(0.6561)(0.3086)(0.345)
age;beloning-0.1296-0.0931-0.0731
p-value(0.1617)(0.3158)(0.3031)
age;totblogs0.02530.03850.0292
p-value(0.7858)(0.6787)(0.6761)
age;Login0.020.02660.0227
p-value(0.8294)(0.7751)(0.746)
beloning;totblogs-0.0895-0.0344-0.0229
p-value(0.3351)(0.7118)(0.718)
beloning;Login-0.0745-0.1365-0.0927
p-value(0.4229)(0.1405)(0.1459)
totblogs;Login0.41530.47410.3378
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_in_RFC;Connected & 0.1099 & 0.0855 & 0.0589 \tabularnewline
p-value & (0.2362) & (0.3576) & (0.3631) \tabularnewline
Time_in_RFC;Separate & 0.0045 & -0.0565 & -0.0389 \tabularnewline
p-value & (0.9617) & (0.5433) & (0.5465) \tabularnewline
Time_in_RFC;age & -0.0336 & -0.0727 & -0.0574 \tabularnewline
p-value & (0.7181) & (0.4338) & (0.4105) \tabularnewline
Time_in_RFC;beloning & 0.0221 & 0.0469 & 0.0326 \tabularnewline
p-value & (0.8121) & (0.6142) & (0.6067) \tabularnewline
Time_in_RFC;totblogs & 0.0195 & -0.0192 & -0.0145 \tabularnewline
p-value & (0.8338) & (0.8368) & (0.8161) \tabularnewline
Time_in_RFC;Login & -0.0802 & -0.1007 & -0.0622 \tabularnewline
p-value & (0.3881) & (0.2781) & (0.3205) \tabularnewline
Connected;Separate & 0.2941 & 0.2588 & 0.1919 \tabularnewline
p-value & (0.0012) & (0.0047) & (0.0043) \tabularnewline
Connected;age & 0.15 & 0.1109 & 0.0854 \tabularnewline
p-value & (0.105) & (0.2319) & (0.2391) \tabularnewline
Connected;beloning & 0.0079 & 0.0377 & 0.0259 \tabularnewline
p-value & (0.9327) & (0.6849) & (0.694) \tabularnewline
Connected;totblogs & 0.006 & -0.0086 & -0.0014 \tabularnewline
p-value & (0.949) & (0.9261) & (0.9832) \tabularnewline
Connected;Login & -0.0037 & 0.0985 & 0.069 \tabularnewline
p-value & (0.9683) & (0.2885) & (0.2894) \tabularnewline
Separate;age & 0.04 & 0.0056 & 0.0056 \tabularnewline
p-value & (0.667) & (0.9521) & (0.9386) \tabularnewline
Separate;beloning & -0.0625 & -0.0436 & -0.0288 \tabularnewline
p-value & (0.5013) & (0.6391) & (0.6616) \tabularnewline
Separate;totblogs & -0.0238 & -0.0206 & -0.0133 \tabularnewline
p-value & (0.7979) & (0.8249) & (0.837) \tabularnewline
Separate;Login & 0.0414 & 0.0945 & 0.0613 \tabularnewline
p-value & (0.6561) & (0.3086) & (0.345) \tabularnewline
age;beloning & -0.1296 & -0.0931 & -0.0731 \tabularnewline
p-value & (0.1617) & (0.3158) & (0.3031) \tabularnewline
age;totblogs & 0.0253 & 0.0385 & 0.0292 \tabularnewline
p-value & (0.7858) & (0.6787) & (0.6761) \tabularnewline
age;Login & 0.02 & 0.0266 & 0.0227 \tabularnewline
p-value & (0.8294) & (0.7751) & (0.746) \tabularnewline
beloning;totblogs & -0.0895 & -0.0344 & -0.0229 \tabularnewline
p-value & (0.3351) & (0.7118) & (0.718) \tabularnewline
beloning;Login & -0.0745 & -0.1365 & -0.0927 \tabularnewline
p-value & (0.4229) & (0.1405) & (0.1459) \tabularnewline
totblogs;Login & 0.4153 & 0.4741 & 0.3378 \tabularnewline
p-value & (0) & (0) & (0) \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=197035&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_in_RFC;Connected[/C][C]0.1099[/C][C]0.0855[/C][C]0.0589[/C][/ROW]
[ROW][C]p-value[/C][C](0.2362)[/C][C](0.3576)[/C][C](0.3631)[/C][/ROW]
[ROW][C]Time_in_RFC;Separate[/C][C]0.0045[/C][C]-0.0565[/C][C]-0.0389[/C][/ROW]
[ROW][C]p-value[/C][C](0.9617)[/C][C](0.5433)[/C][C](0.5465)[/C][/ROW]
[ROW][C]Time_in_RFC;age[/C][C]-0.0336[/C][C]-0.0727[/C][C]-0.0574[/C][/ROW]
[ROW][C]p-value[/C][C](0.7181)[/C][C](0.4338)[/C][C](0.4105)[/C][/ROW]
[ROW][C]Time_in_RFC;beloning[/C][C]0.0221[/C][C]0.0469[/C][C]0.0326[/C][/ROW]
[ROW][C]p-value[/C][C](0.8121)[/C][C](0.6142)[/C][C](0.6067)[/C][/ROW]
[ROW][C]Time_in_RFC;totblogs[/C][C]0.0195[/C][C]-0.0192[/C][C]-0.0145[/C][/ROW]
[ROW][C]p-value[/C][C](0.8338)[/C][C](0.8368)[/C][C](0.8161)[/C][/ROW]
[ROW][C]Time_in_RFC;Login[/C][C]-0.0802[/C][C]-0.1007[/C][C]-0.0622[/C][/ROW]
[ROW][C]p-value[/C][C](0.3881)[/C][C](0.2781)[/C][C](0.3205)[/C][/ROW]
[ROW][C]Connected;Separate[/C][C]0.2941[/C][C]0.2588[/C][C]0.1919[/C][/ROW]
[ROW][C]p-value[/C][C](0.0012)[/C][C](0.0047)[/C][C](0.0043)[/C][/ROW]
[ROW][C]Connected;age[/C][C]0.15[/C][C]0.1109[/C][C]0.0854[/C][/ROW]
[ROW][C]p-value[/C][C](0.105)[/C][C](0.2319)[/C][C](0.2391)[/C][/ROW]
[ROW][C]Connected;beloning[/C][C]0.0079[/C][C]0.0377[/C][C]0.0259[/C][/ROW]
[ROW][C]p-value[/C][C](0.9327)[/C][C](0.6849)[/C][C](0.694)[/C][/ROW]
[ROW][C]Connected;totblogs[/C][C]0.006[/C][C]-0.0086[/C][C]-0.0014[/C][/ROW]
[ROW][C]p-value[/C][C](0.949)[/C][C](0.9261)[/C][C](0.9832)[/C][/ROW]
[ROW][C]Connected;Login[/C][C]-0.0037[/C][C]0.0985[/C][C]0.069[/C][/ROW]
[ROW][C]p-value[/C][C](0.9683)[/C][C](0.2885)[/C][C](0.2894)[/C][/ROW]
[ROW][C]Separate;age[/C][C]0.04[/C][C]0.0056[/C][C]0.0056[/C][/ROW]
[ROW][C]p-value[/C][C](0.667)[/C][C](0.9521)[/C][C](0.9386)[/C][/ROW]
[ROW][C]Separate;beloning[/C][C]-0.0625[/C][C]-0.0436[/C][C]-0.0288[/C][/ROW]
[ROW][C]p-value[/C][C](0.5013)[/C][C](0.6391)[/C][C](0.6616)[/C][/ROW]
[ROW][C]Separate;totblogs[/C][C]-0.0238[/C][C]-0.0206[/C][C]-0.0133[/C][/ROW]
[ROW][C]p-value[/C][C](0.7979)[/C][C](0.8249)[/C][C](0.837)[/C][/ROW]
[ROW][C]Separate;Login[/C][C]0.0414[/C][C]0.0945[/C][C]0.0613[/C][/ROW]
[ROW][C]p-value[/C][C](0.6561)[/C][C](0.3086)[/C][C](0.345)[/C][/ROW]
[ROW][C]age;beloning[/C][C]-0.1296[/C][C]-0.0931[/C][C]-0.0731[/C][/ROW]
[ROW][C]p-value[/C][C](0.1617)[/C][C](0.3158)[/C][C](0.3031)[/C][/ROW]
[ROW][C]age;totblogs[/C][C]0.0253[/C][C]0.0385[/C][C]0.0292[/C][/ROW]
[ROW][C]p-value[/C][C](0.7858)[/C][C](0.6787)[/C][C](0.6761)[/C][/ROW]
[ROW][C]age;Login[/C][C]0.02[/C][C]0.0266[/C][C]0.0227[/C][/ROW]
[ROW][C]p-value[/C][C](0.8294)[/C][C](0.7751)[/C][C](0.746)[/C][/ROW]
[ROW][C]beloning;totblogs[/C][C]-0.0895[/C][C]-0.0344[/C][C]-0.0229[/C][/ROW]
[ROW][C]p-value[/C][C](0.3351)[/C][C](0.7118)[/C][C](0.718)[/C][/ROW]
[ROW][C]beloning;Login[/C][C]-0.0745[/C][C]-0.1365[/C][C]-0.0927[/C][/ROW]
[ROW][C]p-value[/C][C](0.4229)[/C][C](0.1405)[/C][C](0.1459)[/C][/ROW]
[ROW][C]totblogs;Login[/C][C]0.4153[/C][C]0.4741[/C][C]0.3378[/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=197035&T=2

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=197035&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
Time_in_RFC;Connected0.10990.08550.0589
p-value(0.2362)(0.3576)(0.3631)
Time_in_RFC;Separate0.0045-0.0565-0.0389
p-value(0.9617)(0.5433)(0.5465)
Time_in_RFC;age-0.0336-0.0727-0.0574
p-value(0.7181)(0.4338)(0.4105)
Time_in_RFC;beloning0.02210.04690.0326
p-value(0.8121)(0.6142)(0.6067)
Time_in_RFC;totblogs0.0195-0.0192-0.0145
p-value(0.8338)(0.8368)(0.8161)
Time_in_RFC;Login-0.0802-0.1007-0.0622
p-value(0.3881)(0.2781)(0.3205)
Connected;Separate0.29410.25880.1919
p-value(0.0012)(0.0047)(0.0043)
Connected;age0.150.11090.0854
p-value(0.105)(0.2319)(0.2391)
Connected;beloning0.00790.03770.0259
p-value(0.9327)(0.6849)(0.694)
Connected;totblogs0.006-0.0086-0.0014
p-value(0.949)(0.9261)(0.9832)
Connected;Login-0.00370.09850.069
p-value(0.9683)(0.2885)(0.2894)
Separate;age0.040.00560.0056
p-value(0.667)(0.9521)(0.9386)
Separate;beloning-0.0625-0.0436-0.0288
p-value(0.5013)(0.6391)(0.6616)
Separate;totblogs-0.0238-0.0206-0.0133
p-value(0.7979)(0.8249)(0.837)
Separate;Login0.04140.09450.0613
p-value(0.6561)(0.3086)(0.345)
age;beloning-0.1296-0.0931-0.0731
p-value(0.1617)(0.3158)(0.3031)
age;totblogs0.02530.03850.0292
p-value(0.7858)(0.6787)(0.6761)
age;Login0.020.02660.0227
p-value(0.8294)(0.7751)(0.746)
beloning;totblogs-0.0895-0.0344-0.0229
p-value(0.3351)(0.7118)(0.718)
beloning;Login-0.0745-0.1365-0.0927
p-value(0.4229)(0.1405)(0.1459)
totblogs;Login0.41530.47410.3378
p-value(0)(0)(0)



Parameters (Session):
par1 = pearson ;
Parameters (R input):
par1 = pearson ;
R code (references can be found in the software module):
par1 <- 'pearson'
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')