Free Statistics

of Irreproducible Research!

Author's title

Author*The author of this computation has been verified*
R Software Modulerwasp_kendall.wasp
Title produced by softwareKendall tau Rank Correlation
Date of computationFri, 12 Sep 2008 06:29:09 -0600
Cite this page as followsStatistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?v=date/2008/Sep/12/t1221223808mvg9mikak9drola.htm/, Retrieved Sat, 18 May 2024 14:37:15 +0000
Statistical Computations at FreeStatistics.org, Office for Research Development and Education, URL https://freestatistics.org/blog/index.php?pk=14716, Retrieved Sat, 18 May 2024 14:37:15 +0000
QR Codes:

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

Post a new message
Dataseries X:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
Dataseries Y:
1
4
7
5
8
11
10
6
12
20
15
16
13
21
22
25
27
17
14
31
28
32
23
33
42
45
35
24
9
3
29
41
43
50
44
19
46
40
53
55
38
52
58
56
37
54
59
64
49
68
66
63
60
62
65
61
73
51
72
74
78
39
80
76
48
83
36
84
30
2
67
70
89
93
92
95
96
88
94
77
100
71
47
75
79
106
34
91
111
81
82
109
69
99
97
115
85
98
108
86
112
110
102
57
104
101
118
26
87
126
113
116
107
124
123
90
129
105
117
125
103
132
131
120
114
133
137
134
128
18
139
135
121
141
138
140
136
119
144
143
145
127
146
142
147
122
130
153
150
156
151
155
148
149
152
154
157




Summary of computational transaction
Raw Inputview raw input (R code)
Raw Outputview raw output of R engine
Computing time3 seconds
R Server'George Udny Yule' @ 72.249.76.132

\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 & 'George Udny Yule' @ 72.249.76.132 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=14716&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]'George Udny Yule' @ 72.249.76.132[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=14716&T=0

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=14716&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'George Udny Yule' @ 72.249.76.132







Kendall tau Rank Correlation
Kendall tau0.800914645195007
2-sided p-value0
Score9808
Var(Score)434052.65625
Denominator12245.9990234375

\begin{tabular}{lllllllll}
\hline
Kendall tau Rank Correlation \tabularnewline
Kendall tau & 0.800914645195007 \tabularnewline
2-sided p-value & 0 \tabularnewline
Score & 9808 \tabularnewline
Var(Score) & 434052.65625 \tabularnewline
Denominator & 12245.9990234375 \tabularnewline
\hline
\end{tabular}
%Source: https://freestatistics.org/blog/index.php?pk=14716&T=1

[TABLE]
[ROW][C]Kendall tau Rank Correlation[/C][/ROW]
[ROW][C]Kendall tau[/C][C]0.800914645195007[/C][/ROW]
[ROW][C]2-sided p-value[/C][C]0[/C][/ROW]
[ROW][C]Score[/C][C]9808[/C][/ROW]
[ROW][C]Var(Score)[/C][C]434052.65625[/C][/ROW]
[ROW][C]Denominator[/C][C]12245.9990234375[/C][/ROW]
[/TABLE]
Source: https://freestatistics.org/blog/index.php?pk=14716&T=1

Globally Unique Identifier (entire table): ba.freestatistics.org/blog/index.php?pk=14716&T=1

As an alternative you can also use a QR Code:  

The GUIDs for individual cells are displayed in the table below:

Kendall tau Rank Correlation
Kendall tau0.800914645195007
2-sided p-value0
Score9808
Var(Score)434052.65625
Denominator12245.9990234375



Parameters (Session):
Parameters (R input):
R code (references can be found in the software module):
library('Kendall')
k <- Kendall(x,y)
bitmap(file='test1.png')
par(bg=rgb(0.2,0.4,0.6))
plot(x,y,main='Scatterplot',xlab=xlab,ylab=ylab)
grid()
dev.off()
bitmap(file='test2.png')
par(bg=rgb(0.2,0.4,0.6))
plot(rank(x),rank(y),main='Scatterplot of Ranks',xlab=xlab,ylab=ylab)
grid()
dev.off()
load(file='createtable')
a<-table.start()
a<-table.row.start(a)
a<-table.element(a,'Kendall tau Rank Correlation',2,TRUE)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Kendall tau',header=TRUE)
a<-table.element(a,k$tau)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'2-sided p-value',header=TRUE)
a<-table.element(a,k$sl)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Score',header=TRUE)
a<-table.element(a,k$S)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Var(Score)',header=TRUE)
a<-table.element(a,k$varS)
a<-table.row.end(a)
a<-table.row.start(a)
a<-table.element(a,'Denominator',header=TRUE)
a<-table.element(a,k$D)
a<-table.row.end(a)
a<-table.end(a)
table.save(a,file='mytable.tab')